Posez votre question Signaler

Ouvrir une base de donnée access 97 avec mot de passe [Résolu]

Messages postés
151
Date d'inscription
samedi 17 juillet 2004
Statut
Membre
Dernière intervention
11 mai 2012
 - - Dernière réponse : lediablo
Messages postés
215
Date d'inscription
mercredi 26 avril 2006
Statut
Membre
Dernière intervention
2 août 2012
 - 7 janv. 2011 à 11:30
Visual Basic 6 Posez votre question Signaler
Mes cher(E)s ami(E)s
Je suis dans l'embaras, je récuper un message type mot de passe invalide
j'ai trops chercher dans le forum, j'applique mais riens

le code est :
dim DbPatient as database
dim RsPatient as recordset
Dim ws As Workspace
Set ws = DBEngine.Workspaces(0)

Set DbPatient = OpenDatabase(App.Path & "\Datas\Patient.mdb", False, False, ";PWD=amita;")
Set RsPatient = DbPatient.OpenRecordset("IdPatient")

Merci à l'équipe
Afficher la suite 

Votre réponse

Répondre au sujet

1 réponse

Meilleure réponse
Signaler Commenter la réponse de lediablo
Messages postés
215
Date d'inscription
mercredi 26 avril 2006
Statut
Membre
Dernière intervention
2 août 2012
3
Merci
salut
j'ai un exemple qui pourra t'aider peut être, 

dim connexion1 As ADODB.Connection
dim rst As ADODB.Recordset
Dim req
Set connexion1 = New ADODB.Connection
connexion1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Jet OLEDB:Database password=salam-khou-tarik"
Set rst = New ADODB.Recordset
connexion1.Open
rst.CursorLocation = adUseClient
req = "ta requête à exécuté"
rst.Open req, connexion1


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 152 internautes nous ont dit merci ce mois-ci

Commenter la réponse de lediablo

Votre réponse

Répondre au sujet
Posez votre question