P__ROMEO
Messages postés294Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention 9 mars 20061 18 sept. 2005 à 02:02
Puisque tu ne veux pas dire qu'elle genre d'erreur tu as d'affichée, moi, je te dirais ce qui me tracasse
dans ton code.
Si tu as utilisé ADO, et c'est ce que je penses, moi, je n'ai jamais vu ca.
Quand tu fais X1.Open....., pour quoi, tu refais X1.Connection.....
tu dis toi même : Set X1 = New ADODB.Connection
Donc, quand tu fais X1.Open, c'es la connexion que tu ouvres. Pourquoi encore une connexion??
et puis, Data Source = d\patient\docteur.mdb , ici, d c'est quoi? un dossier?? un disque dur??
si c'est un disque, ce n'est pas d\ mais, d:\ (rectifiez moi si je me trompre)
si non, si c'es un répertoire dans le dossier courant, tu fais: .\d\patient\EtLaSuite
Se sont des questions. je ne dis pas que tout cela es faut, parceque, si c'es juste,
de quoi j'aurai l'air!!!!.) mais, commence par rectifier, et essaie de voir ce que ca donne.
-----------------------------------------------------------------------------------
La connaissance ne connait pas de limite, puisque Les recherches la nourrissent
cs_azzouz_soui
Messages postés10Date d'inscriptionsamedi 25 novembre 2000StatutMembreDernière intervention11 avril 2008 18 sept. 2005 à 14:07
bonjour,
le message qui est affiche est " adodc:mot de passe non valide"
je vous signale que j'utilise plusieurs ADODC dans l'application.
salutations.
P__ROMEO
Messages postés294Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention 9 mars 20061 18 sept. 2005 à 20:00
Bonjours,
Tu es sûr que tu as écri le bon mot de passe??
et, tu n'as pas répondu a mes questions. expliques moi pourquoi tu as fais
ta connexion comme ca. parce que, vraiment, je ne comprend pas cette maniere
de procéder. si tu ne peux pas m'expliquer, et si la methode est juste, je remercie plus
initier de m'expliquer les différentes lignes. ca peut toujours me servir.
-----------------------------------------------------------------------------------
La connaissance ne connait pas de limite, puisque Les recherches la nourrissent
Vous n’avez pas trouvé la réponse que vous recherchez ?
cs_azzouz_soui
Messages postés10Date d'inscriptionsamedi 25 novembre 2000StatutMembreDernière intervention11 avril 2008 18 sept. 2005 à 22:48
Bonjour,
voici l'explication du code:
Set X = New ADODB.Connection'pour se connecter à la base
X.Provider = "Microsoft.jet.oledb.4.0" 'pour choisir le provider
X.ConnectionString = App.Path & "\Docteur.mdb" 'definir le chemin de la base de données.
X.Open
'ouverture de la base de données pour l'utilisation.
'Définition du pilote de connexion
X.Provider = "Microsoft.Jet.Oledb.4.0"
'Définition de la chaîne de connexion : chemin complet du .mdb
z = "D:\Patient\Docteur.mdb"
P__ROMEO
Messages postés294Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention 9 mars 20061 19 sept. 2005 à 00:03
Merci pour l'explication. c'est sympa. et, je suis entièrement daccord avec ce code.
je ne veux pas abuser, mais, ce que tu avais envoyé la première fois n'es pas exactement
comme ce code. (j'ai mis les couleurs pour ce qui se resemble)
1er code
Set X1 = New ADODB.Connection
X1.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=d\patient\docteur.mdb"
X1.ConnectionString = App.Path & "\Docteur.mdb"
2em code
Set X = New ADODB.Connection '
pour se connecter à la base
X.Provider = "Microsoft.jet.oledb.4.0" 'pour choisir le provider
X.ConnectionString = App.Path & "\Docteur.mdb" 'definir le chemin de la base de données.
X.Open
'ouverture de la base de données pour l'utilisation.
et, c'est cela qui me dérangait. je trouve qu'il ya une ligne en plus (elle n'influe pas sur le résultat peut etre)
mais, je ne comprenait pas pour quoi elle était la. parce que, la partie non colorié (en noir du 1er code)
fait déja le travail de la ligne suivante. mais, dans le second code, tu ne l'a plus mis (la partie en noire)
je sais, ce n'est pas cela qui va rendre ton travail faux, mais, je voulais juste comprendre, et t'aider si tu avais
fait une erreur. bon, et merci d'avoir ajouté les 2 points ":" apres le d
Maintenant, oublions tous ca, puisque ton problème n'est apparemment pas sur cette partie du code. j'ai fai un tour sur le site,
mais je ne trouves rien sur l'ouverture d'une base de donnée sécurisée. si j'ai quelquechose, je te fais signe
-----------------------------------------------------------------------------------
La connaissance ne connait pas de limite, puisque Les recherches la nourrissent
radcur
Messages postés282Date d'inscriptionlundi 29 septembre 2003StatutMembreDernière intervention15 août 20122 19 sept. 2005 à 05:39
salut
pour tester, si tu créé un controle ado sur ta forme ensuite tu vas
dans ses propriétés. Il y a un endroit ou tu défini la
connectionstring(tu fais des choix et il te construit la
connectionstring pour toi) et tu peux la tester "live". Si ça ne
réussi pas, ca pourrait être le user_id ou le mot de passe qui n'est
pas correct.
cs_azzouz_soui
Messages postés10Date d'inscriptionsamedi 25 novembre 2000StatutMembreDernière intervention11 avril 2008 19 sept. 2005 à 13:12
salut tout le monde.
j'ai essaye toutes les combinaisons de codes qui m'ont etees fournies
mais en vain.
je reexplique
l'application comporte une base de donnees de plusieurs tables sous
access (patient,hist_patient,rdv).
j'accede a l'application par mot de passe VB (contenu dans une table
access et compose de 2 champs util et mot de passe).
la base de donnees Docteur.mdb est composee des autres tables et je
l'ai protegee par un mot de passe access (mode exclusif)
dans mon application j'utilise plusieurs ADODC pour des recherches,des
affichages DBGRID et ainsi de suite.
je veux acceder à la base de donnees via VB et non pas via access
(ouvrir base access puis lancer vb).
le probleme est le suivant. message adodc1:mot de passe non valide
je mets entr adodc2:mot de passe non valide et cela pour tous les ADODC.
je m'execuse si je n'etais pas clair.
merci
P__ROMEO
Messages postés294Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention 9 mars 20061 19 sept. 2005 à 15:09
AZZOUZ, je pense que j'ai trouvé des liens qui peuvent t'intérésser.
en fait, c'est une réponse donnée par Zlub pour question comme la tienne:
j'espère que c'a t'aidera.
-----------------------------------------------------------------------------------
La connaissance ne connait pas de limite, puisque Les recherches la nourrissent