Welcome to WebmasterWorld Guest from 54.198.93.179

Forum Moderators: open

Message Too Old, No Replies

access database help

error 2221

     
12:24 pm on Apr 26, 2006 (gmt 0)

10+ Year Member



Private Sub Form_Load()

Dim username As String * 32

If GetUserName(username, 32) Then

If Trim(username) <> "Admin2" Then

If username = "Dan" Then username = "KLT"
If username = "nickyc" Then username = "NC"
staff.SetFocus
staff.Text = Trim(username) <<<<<<this line
week_commencing.SetFocus
'staff.Enabled = False

End If

End If

End Sub

any help appreciated?

 

Featured Threads

Hot Threads This Week

Hot Threads This Month