Creating user login

[Lori2836 via AccessMonster.com]

I'm looking for help on creating a login message box. The user will open
the New Part Production database to the Welcome splash page...on that page is
a GO button. When they click that, I want a login box to appear. The user
should enter their user name, which should then check for the name in the
"Authorized Users" table. If the name is there, then it needs to open the
"Display User Multi-Departments" form.

Can someone help in how the code should be written?

Thanks,
Lori

 

[Tom van Stiphout]

On Fri, 10 Oct 2008 14:19:11 GMT, "Lori2836 via AccessMonster.com"

if DLookup("username", "Authorized Users", "username='" &
InputBox("What's your username?") & "'") <> "" then
DoCmd.OpenForm "Display User Multi-Departments"
end if

Here is an alternative: Use this code to get the name of the used
logged into Windows: http://www.mvps.org/access/api/api0008.htm
Then silently lookup the name in the table, and proceed.

-Tom.
Microsoft Access MVP

 

[Lori2836 via AccessMonster.com]

Thanks Tom - I'll try it out.

if DLookup("username", "Authorized Users", "username='" &
InputBox("What's your username?") & "'") <> "" then
DoCmd.OpenForm "Display User Multi-Departments"
end if

Here is an alternative: Use this code to get the name of the used
logged into Windows: http://www.mvps.org/access/api/api0008.htm
Then silently lookup the name in the table, and proceed.

-Tom.
Microsoft Access MVP

I'm looking for help on creating a login message box. The user will open
the New Part Production database to the Welcome splash page...on that page is

[quoted text clipped - 7 lines]

Thanks,
Lori