Crée un etat dont le recordsource est une base distante
4 réponses
NicolasCpN
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database
Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd=0000")
Chemin_base="C:\base.mdb"
SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];"
Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est
le bon.
J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de
conserver un password.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Buddy
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de conserver un password.
Merci à tous de votre aide.
Nico
Salut
Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;")
Tiens moa au courant
Ouala
Bye
Buddy
"NicolasCpN" <champon@no-spam.wanadoo.fr> a écrit dans le message de
news:OwYzZrCQEHA.3420@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database
Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00")
Chemin_base="C:base.mdb"
SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];"
Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est
le bon.
J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de
conserver un password.
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de conserver un password.
Merci à tous de votre aide.
Nico
NicolasCpN
Bonjour Buddy
Merci de ton aide, Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste "Mot de passe non valide"
_____________________________________________ "Buddy" a écrit dans le message de news:
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est
le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de conserver un password.
Merci à tous de votre aide.
Nico
Bonjour Buddy
Merci de ton aide,
Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste
"Mot de passe non valide"
_____________________________________________
"Buddy" <brouhaha@noos.fr> a écrit dans le message de
news:OfWNpsEQEHA.2404@TK2MSFTNGP12.phx.gbl...
Salut
Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;")
Tiens moa au courant
Ouala
Bye
Buddy
"NicolasCpN" <champon@no-spam.wanadoo.fr> a écrit dans le message de
news:OwYzZrCQEHA.3420@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à
l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un
mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database
Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00")
Chemin_base="C:base.mdb"
SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];"
Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe
est
le bon.
J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon
état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de
conserver un password.
Merci de ton aide, Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste "Mot de passe non valide"
_____________________________________________ "Buddy" a écrit dans le message de news:
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est
le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de conserver un password.
Merci à tous de votre aide.
Nico
Buddy
Salut je n'ai pas enlevé juste le $, j'ai aussi rajouté un ; après 0000 tu l'as vu ???
Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour Buddy
Merci de ton aide, Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste "Mot de passe non valide"
_____________________________________________ "Buddy" a écrit dans le message de news:
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est
le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de conserver un password.
Merci à tous de votre aide.
Nico
Salut
je n'ai pas enlevé juste le $, j'ai aussi rajouté un ; après 0000
tu l'as vu ???
Buddy
"NicolasCpN" <champon@no-spam.wanadoo.fr> a écrit dans le message de
news:OQLsz5JQEHA.1388@TK2MSFTNGP09.phx.gbl...
Bonjour Buddy
Merci de ton aide,
Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste
"Mot de passe non valide"
_____________________________________________
"Buddy" <brouhaha@noos.fr> a écrit dans le message de
news:OfWNpsEQEHA.2404@TK2MSFTNGP12.phx.gbl...
Salut
Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;")
Tiens moa au courant
Ouala
Bye
Buddy
"NicolasCpN" <champon@no-spam.wanadoo.fr> a écrit dans le message de
news:OwYzZrCQEHA.3420@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à
l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un
mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database
Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00")
Chemin_base="C:base.mdb"
SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];"
Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe
est
le bon.
J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon
état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de
conserver un password.
Salut je n'ai pas enlevé juste le $, j'ai aussi rajouté un ; après 0000 tu l'as vu ???
Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour Buddy
Merci de ton aide, Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste "Mot de passe non valide"
_____________________________________________ "Buddy" a écrit dans le message de news:
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe est
le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de conserver un password.
Merci à tous de votre aide.
Nico
NicolasCpN
Merci Buddy
mais même avec le caractère ; le problème est identique.
Pour contourner mon problème, j'ai fait une petite bidouille, je m'explique: Selon ce que j'ai remarqué dans la procédure Open_Report si je lance un Opendatabase, ma base est ouverte mais refermé aussitôt avant même que État soit édité. Ce qu n'est pas le cas avec un formulaire. La liaison avec la base est ouverte tant que le formulaire est ouvert.
La Solution Création d'un formulaire avec en procédure Form_Load mon Opendatabase ensuite docmd.open_report dans la procédure Open_Report j'envoie mon RecordSource et puis je ferme mon ferme formulaire de connexion.
Et là mon état est OK et mon formulaire n'a même pas été vue.
C'est une solution de Bidouille certes, mais bon...
@+ NicolasCpN "Buddy" a écrit dans le message de news:
Salut je n'ai pas enlevé juste le $, j'ai aussi rajouté un ; après 0000 tu l'as vu ???
Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour Buddy
Merci de ton aide, Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste
"Mot de passe non valide"
_____________________________________________ "Buddy" a écrit dans le message de news:
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un
mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe
est
le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de
conserver un password.
Merci à tous de votre aide.
Nico
Merci Buddy
mais même avec le caractère ; le problème est identique.
Pour contourner mon problème, j'ai fait une petite bidouille, je m'explique:
Selon ce que j'ai remarqué dans la procédure Open_Report si je lance un
Opendatabase, ma base est ouverte mais refermé aussitôt avant même que État
soit édité. Ce qu n'est pas le cas avec un formulaire. La liaison avec la
base est ouverte tant que le formulaire est ouvert.
La Solution
Création d'un formulaire avec en procédure Form_Load mon Opendatabase
ensuite docmd.open_report
dans la procédure Open_Report j'envoie mon RecordSource et puis je ferme mon
ferme formulaire de connexion.
Et là mon état est OK et mon formulaire n'a même pas été vue.
C'est une solution de Bidouille certes, mais bon...
@+
NicolasCpN
"Buddy" <brouhaha@noos.fr> a écrit dans le message de
news:ObJEeiKQEHA.1160@TK2MSFTNGP09.phx.gbl...
Salut
je n'ai pas enlevé juste le $, j'ai aussi rajouté un ; après 0000
tu l'as vu ???
Buddy
"NicolasCpN" <champon@no-spam.wanadoo.fr> a écrit dans le message de
news:OQLsz5JQEHA.1388@TK2MSFTNGP09.phx.gbl...
Bonjour Buddy
Merci de ton aide,
Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème
persiste
"Mot de passe non valide"
_____________________________________________
"Buddy" <brouhaha@noos.fr> a écrit dans le message de
news:OfWNpsEQEHA.2404@TK2MSFTNGP12.phx.gbl...
Salut
Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;")
Tiens moa au courant
Ouala
Bye
Buddy
"NicolasCpN" <champon@no-spam.wanadoo.fr> a écrit dans le message de
news:OwYzZrCQEHA.3420@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à
l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni
d'un
mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database
Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00")
Chemin_base="C:base.mdb"
SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];"
Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de
passe
est
le bon.
J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon
état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé
de
mais même avec le caractère ; le problème est identique.
Pour contourner mon problème, j'ai fait une petite bidouille, je m'explique: Selon ce que j'ai remarqué dans la procédure Open_Report si je lance un Opendatabase, ma base est ouverte mais refermé aussitôt avant même que État soit édité. Ce qu n'est pas le cas avec un formulaire. La liaison avec la base est ouverte tant que le formulaire est ouvert.
La Solution Création d'un formulaire avec en procédure Form_Load mon Opendatabase ensuite docmd.open_report dans la procédure Open_Report j'envoie mon RecordSource et puis je ferme mon ferme formulaire de connexion.
Et là mon état est OK et mon formulaire n'a même pas été vue.
C'est une solution de Bidouille certes, mais bon...
@+ NicolasCpN "Buddy" a écrit dans le message de news:
Salut je n'ai pas enlevé juste le $, j'ai aussi rajouté un ; après 0000 tu l'as vu ???
Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour Buddy
Merci de ton aide, Sur tes bons conseils, j'ai enlevé le caractère $ mais le problème persiste
"Mot de passe non valide"
_____________________________________________ "Buddy" a écrit dans le message de news:
Salut Essaies ça
Set db1 = OpenDatabase(Chemin_base, False, False, ";pwd 00;") Tiens moa au courant
Ouala Bye Buddy
"NicolasCpN" a écrit dans le message de news:
Bonjour,
J'ai réalisé un état. Celui-ci à une procédure évènementielle à l'ouverture
qui donne la valeur du RecordSource
Me.Report.Record=SQL
Mais la chaîne SQL fait appel à une base de donnée distante muni d'un
mot de
passe.
J'ai donc effectué la procédure suivante
Dim SQL As String, Chemin_base As String, db1 As Database Set db1 = OpenDatabase(Chemin_base$, False, False, ";pwd 00") Chemin_base="C:base.mdb" SQL = "SELECT [garde].* FROM [" & Chemin_base$ & "].[garde];" Me.Report.RecordSource=SQL
J'ai systématiquement l'erreur mot de passe non valide. Le mot de passe
est
le bon. J'utilise ce principe dans mes formulaires et pas de problèmes.
Par ailleurs si je supprime le mot de passe de la base distante, mon état
s'ouvre sans problèmes. Pour des raisons de sécurité, je suis obligé de