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 ...

 

[Pat Hartman]

When creating embedded strings that need delimiters, I prefer to create a variable and put the string into a variable. That way it is much easier to debug because I can print out the string and see how it looks.