Ouvrir une base de donnée access 97 avec mot de passeRésolu

Question

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

lediablo · Accepted Answer

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)

Ouvrir une base de donnée access 97 avec mot de passe

1 réponse

Votre réponse