Commentaires sur une source : CONNEXION ADO SUR BD ACCESS PROTÉGÉE PAR PASSWORD

afro4 Messages postés 8 Date d'inscription mercredi 4 novembre 2009 Statut Membre Dernière intervention 19 septembre 2010
12 juin 2011 à 12:24

Salut,
Ton code m'a inspiré pour créer pour une connexion entre une base de données Access 2007 protégée par un mot de passe et vb.net.

cnxstr = "Provider=Microsoft.ACE.OLEDB.12.0 ; data source = " & Application.StartupPath & "\MaBase.accdb;" & "Jet OLEDB:Database Password=passer"

cnx = New OleDbConnection
cnx.ConnectionString = cnxstr
cnx.Open()

Bravo pour ton esprit de partage. 10/10

afro4 Messages postés 8 Date d'inscription mercredi 4 novembre 2009 Statut Membre Dernière intervention 19 septembre 2010
12 juin 2011 à 12:22

Salut,
Ton code m'a inspiré pour créer pour une connexion entre une base de données Access 2007 protégée par un mot de passe et vb.net.

cnxstr = "Provider=Microsoft.ACE.OLEDB.12.0 ; data source = " &_ Application.StartupPath & "\MaBase.accdb;" & "Jet OLEDB:Database Password=passer"

cnx = New OleDbConnection
cnx.ConnectionString = cnxstr
cnx.Open()

Bravo pour ton esprit de partage. 10/10

NOUVEAUCALIMERO Messages postés 7 Date d'inscription samedi 28 juillet 2007 Statut Membre Dernière intervention 21 décembre 2007
23 déc. 2007 à 20:32

Bonsoir,
DRMAD, savez vous comment parametrer un dataenvironnement dans votre projet, afin que la connexion à la base se fasse sans erreur.
J'ai essayé, mais je n'y arrive pas, la connexion echoue.
Sinon le code fourni ci dessus, fonctionne ben.

EvilGost Messages postés 235 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 mai 2011 2
17 janv. 2006 à 13:58

"pilote isam introuvable" finalement, ca ne marchait qu'avec ton exemple...peut-etre que cela dépend de la version d'access de la base de données...

EvilGost Messages postés 235 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 mai 2011 2
17 janv. 2006 à 13:40

ca marche impec, hormis le app.path qu'il aurait fallu mettre, ca marchouille :)

lordnecron Messages postés 4 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 8 septembre 2004
1 déc. 2004 à 15:44

Moi aussi j'avais pilote ISAM introuvable.
J'ai changé ma chaîne de connexion comme cela :

pConnexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & chemin & ";" & _
"Jet OLEDB:Database Password=DBT_MSI&JBT;" & _
"Persist Security Info=False"

C'est la ligne "Jet OLEDB:Database Password=MonPass;" & _
qui ma permis de passer outre mon pb de connection.

A bon entendeur !
Salut

lordnecron Messages postés 4 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 8 septembre 2004
1 déc. 2004 à 15:43

Moi aussi j'avais pilote ISAM introuvable.
J'ai changé ma chaîne de connexion comme cela :

pConnexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & chemin & ";" & _
"Jet OLEDB:Database Password=DBT_MSI&JBT;" & _
"Persist Security Info=False"

C'est la ligne "Jet OLEDB:Database Password=MonPass;" & _
qui ma permis de passer outre mon pb de connection.

A bon entendeur !
Salut

cs_math85 Messages postés 58 Date d'inscription lundi 7 janvier 2002 Statut Membre Dernière intervention 26 janvier 2005
19 mars 2004 à 15:06

ca marche pas, il me met "pilote isam introuvable"

cs_math85 Messages postés 58 Date d'inscription lundi 7 janvier 2002 Statut Membre Dernière intervention 26 janvier 2005
19 mars 2004 à 15:06

ca marche pas, il me met "pilote isam introuvable"

samVSchris Messages postés 1 Date d'inscription jeudi 10 juillet 2003 Statut Membre Dernière intervention 1 août 2003
1 août 2003 à 12:07

Je débute en vb et je savais pô comment faire de connexion à une BdD Access avec mot de passe non plus... mais j'ai fait un peu de lecture et voilà comment je m'en suis tiré (c'est bizarre que ma méthode soit si différente de celles proposées ???)

Avec dsn:
con.ConnectionString = "DSN=mondsn" & ";UID=;PWD=monpassword;"

Sans dsn:
con.ConnectionString = "driver={Microsoft Access Driver (*.mdb)};UID=;PWD=monpassword;DBQ=chemin/mabase.mdb;"

Puis:
con.Open

Est-ce que j'ai bien fait ou bien ça va buggé plus tard ??? Ca m'a l'air trop simple... :-/... En tout cas, ça marche bien pour le moment.

(commentaires attendus avec impatience à propos des + et des - !!!)

pyfux Messages postés 10 Date d'inscription dimanche 20 octobre 2002 Statut Membre Dernière intervention 27 mars 2014
16 avril 2003 à 18:55

Mais non, ça marche sauf que dans la Public Sub connexion_bd() il fo modifier:

connection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=I:Projet MémoireAdo sécuriséd1.mdb;" & _
"Jet OLEDB:Database Password=test"

par:

connection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & "d1.mdb;" & _
"Jet OLEDB:Database Password=test"

Sinon, c très cool.
Bravo !

cs_drmad Messages postés 11 Date d'inscription samedi 7 décembre 2002 Statut Membre Dernière intervention 6 avril 2003
6 avril 2003 à 16:26

ok je note skyraider.

cs_skyraider Messages postés 7 Date d'inscription jeudi 1 février 2001 Statut Membre Dernière intervention 1 mai 2005
5 avril 2003 à 13:00

C'est nul ! Ca bug de partout. Arf, apprends a programmer !

cs_drmad Messages postés 11 Date d'inscription samedi 7 décembre 2002 Statut Membre Dernière intervention 6 avril 2003
5 avril 2003 à 12:57

Rmq : la ligne 'connection.Provider = "Microsoft.jet.OLEDB.4.0" dans le module est inutile.

Sorry

CONNEXION ADO SUR BD ACCESS PROTÉGÉE PAR PASSWORD

Votre réponse

Discussions similaires