Mot de passe et Connection

Résolu
jsem2k1 Messages postés 125 Date d'inscription samedi 11 décembre 2004 Statut Membre Dernière intervention 12 août 2008 - 14 juil. 2005 à 19:41
Zlub Messages postés 809 Date d'inscription mercredi 11 octobre 2000 Statut Membre Dernière intervention 29 septembre 2010 - 16 juil. 2005 à 21:55
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

4 réponses

Zlub Messages postés 809 Date d'inscription mercredi 11 octobre 2000 Statut Membre Dernière intervention 29 septembre 2010 8
16 juil. 2005 à 21:55
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
3
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
14 juil. 2005 à 20:16
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/
0
cs_ricounet34 Messages postés 24 Date d'inscription jeudi 2 juin 2005 Statut Membre Dernière intervention 29 juillet 2005
14 juil. 2005 à 22:40
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"
0
jsem2k1 Messages postés 125 Date d'inscription samedi 11 décembre 2004 Statut Membre Dernière intervention 12 août 2008 1
15 juil. 2005 à 19:34
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
0
Rejoignez-nous