VBA SQL Query no working

HI there,

i have set up user level security and am implementing some tracking for the users. this is part of a delete record section of code

Code:

---

    'append user name carrying out deletion
    dbs.Execute "UPDATE tblDeletions" _
        & " SET tblDeletions.MyUserName = " & lpUserName & "" _
        & " WHERE tbldeletions.ID = " & strRefNum & ";"

---

i am getting a to few parameters message for this section of code.

it seems to relate to the lpUserName which has been assigned the currently logged on users name.

ive tried messing it around a little but still end up back at the same place with teh to few parameters.

Im sure its something simple, as if i use a fixed string it works:

Code:

---

    'append user name carrying out deletion
    dbs.Execute "UPDATE tblDeletions" _
        & " SET tblDeletions.MyUserName = 'LoggedOnUser'" _
        & " WHERE tbldeletions.ID = " & strRefNum & ";"

---

TIA for any suggestions

Brian

Where are the quotes around the username?

& " SET tblDeletions.MyUserName = '" & lpUserName & "'" _

Quote:

---

Originally posted by M Owen
Where are the quotes around the username?

& " SET tblDeletions.MyUserName = '" & lpUserName & "'" _

---

Thank you..

sorted, i knew i was missing something..:bigyello: