Help on writing expression/vb code

[AccessDevJunior]

Hya,

I have a access form where i would like certain user's restricted from opening.

I do not tend to use much expressions in my databases
and so i have not much experience, basically what i want is if a particular user trys to open form and their username dosnt match up with the list of usernames in table the Event is cancelled. If the username does match the Event will continue.

IF [UserName] IsNot "abc" Cancell Event

Could anyone help me with this?

 

[Grumbledook]

Where is the user name derived from? a Table or Access built in security?

G.

 

[randy700]

You could build a table of authorized users, then use the following code in the click event of a command button...

Private Sub cmdEnter_OnClick()
Dim strName As String
strName = InputBox("Enter Login ID")
If IsNull(DLookup("Name","tblUsers","Name = '" & strName & "'")) Then
MsgBox "Unauthorized user", vbCritical + vbOkOnly, "Access Denied"
Else
Enter code necessary to allow access
End If
End Sub

Or, use the structure I described in thread 702-829870.

Randy

 

[AccessDevJunior]

thankyou for you your responses

I am wanting to create a table with a list of UserNames that are allowed access the form

 

[randy700]

??
Isn't that what I gave you?

Randy

 

[AccessDevJunior]

Yes, thankyou that was exactly what i needed, just responding to 'grumbledook'.