Logging in from multiple locations

Patrick Melton wrote: You can just comment it out so it looks like this: 'For extra security create a new user code for the user    strUserCode = userCode(strUsername)    'Save the new usercode back to the database    'rsCommon.Fields("User_code") = strUserCode    'rsCommon.Update

'For extra security create a new user code for the user
   strUserCode = rsCommon("User_code")

   'Save the new usercode back to the database
   'rsCommon.Fields("User_code") = strUserCode
   'rsCommon.Update

use this code. its the bold section that is needed, as you need to get the usercode from the database.

I disagree dj air - why would you change that line? You don't need to read it in at all. First, because it's read in directly above, and secondly because you're not going to do anything with it.

Basically, all you need to do is comment out these two lines:

   'rsCommon.Fields("User_code") = strUserCode
   'rsCommon.Update

I've done that and not modified anything else and it works perfect.