Mot de passe access

4/5 (49 avis)

Vue 43 501 fois - Téléchargée 22 181 fois

Description

J'ai trouver le code et je l'ai amélioré. Il permet de retrouver le mot de passe d'une base des données MS Access.

Conclusion :


Le Mot de passe de la base est "test" sans les côtes

Codes Sources

A voir également

Ajouter un commentaire Commentaires
GeneticW Messages postés 34 Date d'inscription samedi 3 juin 2006 Statut Membre Dernière intervention 23 avril 2011
25 févr. 2012 à 06:14
Tu peut la poster quelques part la Bd ? Je vais t'envoyer le mdp.
BOLITHO976 Messages postés 1 Date d'inscription vendredi 24 février 2012 Statut Membre Dernière intervention 24 février 2012
24 févr. 2012 à 16:52
bonjour, je suis nouveau et novice ! je viens de trouver ce post et je suis au désespoir; j'ai une base mdb 2003 protégée par un MDP. J'ai téléchargé votre ZIP mais le mot de passe (décidément) "test" ne semble plus valide. Pourriez vous m'aider?
cordialement
Bolitho
joeb1010 Messages postés 7 Date d'inscription mardi 21 décembre 2004 Statut Membre Dernière intervention 2 décembre 2010
2 déc. 2010 à 13:26
Le truc marche à 100% Grand merci
cs_FlyingAlex Messages postés 17 Date d'inscription mardi 3 mars 2009 Statut Membre Dernière intervention 25 novembre 2010
18 nov. 2009 à 20:40
Je n'arrive pas à utiliser la bdd : lorque je l'ouvre, il y a marqué pas d'objet et quand je clique sur parcourir : erreur d'execution 438 : propriété ou methode non gérée par cet objet. Il me met un bug à cette ligne (la dernière) :

Option Compare Database
Option Explicit

'***************************************************
'Author: Krsev Ivan
'Description: this program retrieve ms access database password
'Author Email address: ivan@chameleon.co.yu
'Use this program as you whish, just drop me an email to say thank you
'that's my reward
'Because i'm lasy i used forms from Vipul Parmar and part for access97 pasword


'In accsess 2000 password is stored at the begining of file at offset 0x42H
'Differencies from access 97 is that every char uses 2 (A1 E2) words insted of 1 (A1) probably because of unicode
'But we are dealing only with half of it. Not interested in right half
'Access2000 password is limited on 20 chars MAX, if you use more it'll be truncated


Dim n As Long, s1 As String * 1, s2 As String * 1
Dim dbname As String
Dim passw As String
Dim bckPass As String
Dim mask97 As String
Dim mask2k As String
Dim priv As String
Dim priv2 As String
Dim prviput As Boolean
Dim TrebaObavestiti As Boolean
Public cnn1 As ADODB.Connection

Private Sub Command1_Click()
Dim ff
Dim strfilter, strlines, alltext As String
ff = FreeFile
strfilter = "Access97 Files (*.mdb)|*.mdb"
Me.cd1.Filter = strfilter

Pour info je suis sur access 2007.

Merci d'avance!!!!
garci80 Messages postés 1 Date d'inscription mercredi 26 novembre 2008 Statut Membre Dernière intervention 2 juin 2009
2 juin 2009 à 11:55
Bravo et merci !
Aucun problème, cela marche bien.
Afficher les 49 commentaires

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.