Welcome to WebmasterWorld Guest from 54.163.40.152

Forum Moderators: open

Message Too Old, No Replies

Runtime Error 2221

The text is too long to be edited

     

humpingdan

11:10 am on Apr 26, 2006 (gmt 0)

10+ Year Member



This is the area access is highlighting for me:

Private Sub Form_Load()

Dim username As String * 32

If GetUserName(username, 32) Then

If Trim(username) <> "Admin2" Then

If username = "KTomlin" 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

Any ideas greatly appreciated?

End Sub

 

Featured Threads

Hot Threads This Week

Hot Threads This Month