OVH Cloud OVH Cloud

ouvrir access avec mot de passe

3 réponses
Avatar
nullus premier
quand avec ACCESS97 j'ouvre ma base de donn=E9es, j'ai un=20
inputbox qui me demande mon login et mon mot de passe.
je lui donne ADMIN et RALEUR et ma base est ouverte.
avec VB6, je n'y arrive pas. voici ma commande :

Set db =3D New Connection
db.Open "PROVIDER=3DMicrosoft.Jet.OLEDB.3.51;iud=3DADMIN;pwd=3DRA
LEUR;Data Source=3D"c:\mabase.mdb;"
Set adoPrimaryRS =3D New Recordset
adoPrimaryRS.Open "select * from MATABLE;", db,=20
adOpenDynamic, adLockOptimistic

bien entendu, j'ai une table MATABLE avec des champs=20
remplis.

3 réponses

Avatar
lolo
ce n'est pas iud mais uid pour le nom d'utilisateur.
sinon moi j'utilise DAO, et je te le conseille, avec une
base access il n'y a pas plus rapide.


-----Message d'origine-----
quand avec ACCESS97 j'ouvre ma base de données, j'ai un
inputbox qui me demande mon login et mon mot de passe.
je lui donne ADMIN et RALEUR et ma base est ouverte.
avec VB6, je n'y arrive pas. voici ma commande :

Set db = New Connection
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;iud­MIN;pwd=


RA
LEUR;Data Source="c:mabase.mdb;"
Set adoPrimaryRS = New Recordset
adoPrimaryRS.Open "select * from MATABLE;", db,
adOpenDynamic, adLockOptimistic

bien entendu, j'ai une table MATABLE avec des champs
remplis.

.



Avatar
Et en DAO, tu as un "pas à pas" quelque part sur le WEB
pour que je m'y essaye avec VB6 et ACCESS97 ? Car je ne
connais pas du tout.

Merci
-----Message d'origine-----
ce n'est pas iud mais uid pour le nom d'utilisateur.
sinon moi j'utilise DAO, et je te le conseille, avec une
base access il n'y a pas plus rapide.


-----Message d'origine-----
quand avec ACCESS97 j'ouvre ma base de données, j'ai un
inputbox qui me demande mon login et mon mot de passe.
je lui donne ADMIN et RALEUR et ma base est ouverte.
avec VB6, je n'y arrive pas. voici ma commande :

Set db = New Connection
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;iud­MIN;pwd=


RA
LEUR;Data Source="c:mabase.mdb;"
Set adoPrimaryRS = New Recordset
adoPrimaryRS.Open "select * from MATABLE;", db,
adOpenDynamic, adLockOptimistic

bien entendu, j'ai une table MATABLE avec des champs
remplis.

.



.



Avatar
nullus premier
j'ai enfin trouvé !!
bd.open "Provider=Microsoft.Jet.OLEDB.3.51;Persist
Security Infoúlse;Data Source=C:mabase.mdb;Jet
OLEDB:Database Password=RALEUR"

Il faut et il suffit d'ajouter "sésame ouvre toi" ou en
VB6-ACCESS97 "Jet OLEDB:Database Password=RALEUR" et non
se perdre dans uid et pwd, qui sont des utilisateurs avec
des droits définis dans la base de données et moi je
bloquais sur l'ouverture de la base fermée avec un mot de
passe !

Alors un grand merci à moi-même, ma patience, ma
persévérence, ma constance ;o)