VBA SQL Query no working

[Br1an_g]

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

    '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:

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

TIA for any suggestions

Brian