Error while executing following code relating DLookup

[dhyadav]

Hi everyone.

Error while executing following code relating DLookup

RightUser = DLookup("[UserRights]", "tblRights", "[FormName]=" & Me.name & " " & "And [EmplUserName]='" & TempVars(EmplUserName) & "'")


this gives the error "Data type mismatch in criteria or expression".

Any ideas? I'm sure it's a minor error but I'm really stumped!!

Thanks in advance,

Dharmesh

 

[Uncle Gizmo]

I moved your post to the general section

 

[Gasman]

I believe you will need single quotes surrounding Me.name as you have done for Tempvars?
Get rid of the " " string and just prefix And with a space

HTH

Hi everyone.

Error while executing following code relating DLookup

RightUser = DLookup("[UserRights]", "tblRights", "[FormName]=" & Me.name & " " & "And [EmplUserName]='" & TempVars(EmplUserName) & "'")


this gives the error "Data type mismatch in criteria or expression".

Any ideas? I'm sure it's a minor error but I'm really stumped!!

Thanks in advance,

Dharmesh

 

[dhyadav]

Hi HTH

After modifying as mentioned below, my code is as follows :-

RightUser = DLookup("[UserRights]", "tblRights", "[FormName]='" & Me.name & " And [EmplUserName]='" & TempVars("EmplUserName") & "'")

(Want to retrieve UerRights (numeric value) based on two criteria One is Form Name (String) and Second is User Name (String)

However following Error occurs

syntax error (missing operator) in query expression '[FormName] = 'frmlogin and [EmplUserName]='ADMIN''.

Kindly guide me for above code

Dharmesh

 

[JHB]

You forgot a single quotes after the "Me.name":

 "... [FormName]='" & Me.name & "[B][COLOR=Red]'[/COLOR][/B] And [EmplUse ...