Recuperer le mot de passe d'une db access
Soyez le premier à donner votre avis sur cette source.
Snippet vu 26 306 fois - Téléchargée 70 fois
Contenu du snippet
Permet de connaitre le mot de passe qui protège une base de donnée Access
Source / Exemple :
'********************************************************************************************
' Name : xGetAccessPwd
' Purpose : Get the password of an MS Access database
' Syntax : xGetAccessPwd(FileName)
' Parameters : FileName : The name (and path) of the Access database
' Return : The password protecting the database
'********************************************************************************************
Function xGetAccessPwd(ByVal FileName As String) As String
Dim intFileID As Integer
Dim strMyChar As String
Dim strTempPwd As String
Dim bytSecretPos As Byte
Dim bytNextChar As Byte
Dim alngSecret(13) As Long
alngSecret(0) = (&H86)
alngSecret(1) = (&HFB)
alngSecret(2) = (&HEC)
alngSecret(3) = (&H37)
alngSecret(4) = (&H5D)
alngSecret(5) = (&H44)
alngSecret(6) = (&H9C)
alngSecret(7) = (&HFA)
alngSecret(8) = (&HC6)
alngSecret(9) = (&H5E)
alngSecret(10) = (&H28)
alngSecret(11) = (&HE6)
alngSecret(12) = (&H13)
bytSecretPos = 0
intFileID = FreeFile
Open FileName For Input As #intFileID ' Open file for input.
For bytNextChar = 67 To 79 Step 1 ' Read in Encrypted Password
Seek #intFileID, bytNextChar ' Set position.
strMyChar = Input(1, #intFileID) ' Read character.
strTempPwd = strTempPwd & Chr(Asc(strMyChar) Xor alngSecret(bytSecretPos)) 'Decrypt using Xor
bytSecretPos = bytSecretPos + 1 ' Increment pointer
Next
Close #intFileID ' Close file.
xGetAccessPwd = strTempPwd
End Function
A voir également
- Db net
- Db visual - Meilleures réponses
- ASP / ASP.NET : Connexion db access via javascript en asp - CodeS SourceS - Guide
- ASP / ASP.NET : Exemple de création d'un tableau html avec un db access - CodeS SourceS - Guide
- ASP / ASP.NET : Exemple de création d'un tableau html avec une db access et form de sé - Guide
- ASP / ASP.NET : Imode_db : version allégé de admin_db pour terminaux imode - CodeS So - Guide
- Visual Basic / VB.NET : Image dans db champ ole - ado - CodeS SourceS - Guide
Stp peux tu me l'avoir dans un projet complet?
j'ai une base access que je n'arrive pas a trouver le mot de passe exacte.Mercie infiniment.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.