by Agust¨n CB (1 Submission)
Category: Databases/Data Access/DAO/ADO
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Wed 26th January 2000
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
Forgot the password you set to an Access 97 database? Here is how to guess it. E-mail me for the Access 2000 version
API Declarations
Dim lsClave As String
Dim mask As String
VBcoders
Chr(55) & Chr(93) & Chr(68) & Chr(156) & _
Chr(250) & Chr(198) & Chr(94) & Chr(40) & Chr(230) & Chr(19)
Open "c:\protected db.mdb" For Binary As #1
Seek #1, &H42
For n = 1 To 14
s1 = Mid(mask, n, 1)
s2 = Input(1, 1)
If (Asc(s1) Xor Asc(s2)) <> 0 Then
lsClave = lsClave & Chr(Asc(s1) Xor Asc(s2))
End If
Next
Close 1
MsgBox "The Password Is: " & lsClave
No comments have been posted about Forgot the password you set to an Access 97 database? Here is how to guess it. E-mail me for the Ac. Why not be the first to post a comment about Forgot the password you set to an Access 97 database? Here is how to guess it. E-mail me for the Ac.