Rename Userid

[southboy]

I have a database that has tables based on the Windows userid of the person who opened the database. When opened a form opens that the user inputs work information for their job. The form is linked to each of their personal userid tables.

The windows userid's where based on the first initial of the user’s first name and the full last name. Ex... rsouthboy

Unfortunately our admin LAN changed everyone’s userid's to firstname.lastname. Ex... ron.southboy
Now when the database opens you get an error that states "The recordsource for xxxx specified on this form does not exist."

I need some help with code that will take the first character of the new userid and everything after the period and combine them. Ex... ron.southboy to rsouthboy (like their userid's use to be.) I can't rename the tables too their new userid's because of the period now in the new userids. Access won't accept that.
Any help would be greatly appreciated.

 

[PWise]

left(userid,1) & mid(userid,instr(userid,".")+1)

 

[TheAceMan1]

or:

[blue] = Left(UserId, 1) & Right(UserId, Len(UserId) - InStr(1, UserId, "'"))[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[PWise]

Ace:
Should be
= Left(UserId, 1) & Right(UserId, Len(UserId) - InStr(1, UserId, "."))


note:

my method uses 2 functions
yours 3

 

[TheAceMan1]

pwise . . .

OOoooops! Howd that getin there?

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[southboy]

Thank you both for your responce.

Pwise, both of yours worked just right. Output...rsouthboy
Thank you for your help with this.