Posez votre question Signaler

Mot de passe et Connection [Résolu]

Messages postés
125
Date d'inscription
samedi 11 décembre 2004
Statut
Membre
Dernière intervention
12 août 2008
 - - Dernière réponse : Zlub
Messages postés
815
Date d'inscription
mercredi 11 octobre 2000
Statut
Membre
Dernière intervention
29 septembre 2010
 - 16 juil. 2005 à 21:55
Visual Basic Posez votre question Signaler
Voi la j'ai un problème. J'ai une basse de donner access qui est protégé par un mot de passe et quand je veux me connecter a cette base de donner sous vb il me donne une erreur Impossible de démarrer votre application. Le fichier d'informations du groupe de travail est absent ou ouvert en mode exclusif par un autre utilisateur.

et la je ne sais pas quoi Faire

voila mon code
With cn
.Provider = "Microsoft.JET.OLEDB.4.0"
.ConnectionString = "Persist Security Info=True;Password=tata;Data Source=" & App.Path & "\data.mdb"
.Open
End With
....

The J
Afficher la suite 

4 réponses

Meilleure réponse
Signaler
Messages postés
815
Date d'inscription
mercredi 11 octobre 2000
Statut
Membre
Dernière intervention
29 septembre 2010
 1
3
Merci
Salut,



J'utilise la même chaine de connexion que Ricounet34 sans pb... sauf
erreur dans le chemin de ta base ou de password, je ne vois pas... Tu
peux essayer ça :





' Procédure de connexion à la base

Public Sub ConnexionBase(
URL_BASE as string, optional
dbPassWord as string
= "")

Dim ChaineConnexion As String



On Error GoTo erreur

ChaineConnexion =
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & URL_BASE &
";Persist Security Info=False;"

ChaineConnexion = ChaineConnexion & "Jet OLEDB:Database Password=" & dbPassWord

cn.Open ChaineConnexion

Exit Sub

erreur:

If cn.State = 1 Then cn.Close

msgbox "Erreur de connexion à la base : " &
URL_BASE & " avec le passwd : " & dbPassWord _

& vbnewline & Err.Description

End sub



' Appel de la connexion

Call ConnexionBase(App.Path & "\data.mdb", "tata")



@+



zlub

Dire « Merci » 3

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

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

Signaler
Messages postés
15838
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
 73
0
Merci
Vérifie que ta base de données n'est pas déjà lancée par un logiciel...

DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) : www.ProgOtoP.com/popapi/
Signaler
Messages postés
24
Date d'inscription
jeudi 2 juin 2005
Statut
Membre
Dernière intervention
29 juillet 2005
0
Merci
essaie ca :

cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" _


& "Data Source=" & App.Path & "\data.mdb" & _


";Jet OLEDB:Database Password=tata;Persist Security Info=False"
Signaler
Messages postés
125
Date d'inscription
samedi 11 décembre 2004
Statut
Membre
Dernière intervention
12 août 2008
0
Merci
J'ai vériffier qu'il n'y avais pas d'autre prog qui utilisais la base de donné et j'avais déja essayer la
The J
Posez votre question