Form error

[JoeAcess]

Hello everybody

I made a form where i need to take a name by giving just the id. So i gave the Dlookup commnad but there is an error "data type mismatch in criteria expression". Can anybody please help

Private Sub Command97_Click()

Me.PtName = DLookup("Baby_Name", "tblFollow_up", "Study_ID='" & Forms!FrmPtAmount!ID & "'")

End Sub

 

[Kiwiman]

Howzit

Try...

Me.PtName = DLookup("Baby_Name", "tblFollow_up", "Study_ID=" & Forms!FrmPtAmount!ID )

If this code is part of the form FrmPTAmount you can use

Me.PtName = DLookup("Baby_Name", "tblFollow_up", "Study_ID=" & me.ID )

 

[JoeAcess]

hey thanks that worked

 

[missinglinq]

Just so that you understand the actual problem

Me.PtName = DLookup("Baby_Name", "tblFollow_up", "Study_ID='" & Forms!FrmPtAmount!ID & "'")

is the correct syntax if Study_ID was defined as a Text field, while

Me.PtName = DLookup("Baby_Name", "tblFollow_up", "Study_ID=" & Forms!FrmPtAmount!ID )

is correct when Study_ID is defined as a Numeric datatype, which apparently is the case here.