hi i have a problem with disabling shift key
this is my module code
Option Compare Database
Sub DisableShiftKey()
Dim db As DAO.Database
Dim prp As DAO.Property
Set db = CurrentDb
On Error Resume Next
db.Properties.Delete "AllowBypassKey"
On Error GoTo 0
Set prp =...
hello im new to access code so i have a login form and a user table that have the usernames , passwords and user full name and in my login form i have login button with this code:
Option Compare Database
Private Sub cmdlog_Click()
If IsNull(Form_frmlogin.txtuser) Then
MsgBox "enter user"...