intLogonAttempts = intLogonAttempts + 1
If intLogonAttempts > 5 Then
MsgBox "BOŞUNA UĞRAŞMAYIN ACAMAZSINIZ.PENCERE KAPATILACAK.", vbCritical, "Bilgilendirme Penceresi"
Application.Quit
End If
bunuda kodların en üstündeki
Option Compare Database
nın hemen altına yaz
Private intLogonAttempts As Integer
#2
