Alors voil=E0, j'ai progress=E9 dans mon code VBA pour me permettre de
r=E9cup=E9rer le r=E9sultat d'une requ=EAte qui s'appelle "essai", et qui
dispose de 8 param=E8tres...
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D
Dim rcs As DAO.Recordset
Dim qdf As DAO.QueryDef
qdf.OpenRecordset
Set rcs =3D qdf.OpenRecordset
message =3D rcs("Lib_client")
Set qdf =3D Nothing
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
Quand j'ex=E9cute, il me met "aucun enregistrement en cours" =E0 la ligne:
=3D=3D=3D=3D=3D=3D=3D
message =3D rcs("Lib_client")
=3D=3D=3D=3D=3D=3D=3D
Mes param=E8tres recoivent bien tous les champs de mon formulaire (j'ai
v=E9rifi=E9).
Aurais-je invers=E9 des =E9l=E9ments dans mon code? Qu'est ce qui cloche?
Je voudrais en fait qu'une variable puisse stocker le ou les r=E9sultats
de ma requ=EAte d'ou le code VBA:
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
Thierry (ze Titi)
Hello jobardu92 !
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante:
Bonjour!
Alors voilà, j'ai progressé dans mon code VBA pour me permettre de récupérer le résultat d'une requête qui s'appelle "essai", et qui dispose de 8 paramètres... ====================================================== > Dim rcs As DAO.Recordset Dim qdf As DAO.QueryDef
qdf.OpenRecordset Set rcs = qdf.OpenRecordset message = rcs("Lib_client")
Set qdf = Nothing ========================================================= > Quand j'exécute, il me met "aucun enregistrement en cours" à la ligne: ====== > message = rcs("Lib_client") ====== > Mes paramètres recoivent bien tous les champs de mon formulaire (j'ai vérifié).
Aurais-je inversé des éléments dans mon code? Qu'est ce qui cloche?
Je voudrais en fait qu'une variable puisse stocker le ou les résultats de ma requête d'ou le code VBA:
============================== > message = rcs("Lib_client") ============================= > Mais ca ne fonctionne pas...
Merci!!!
-- Cordialement, Thierry
Tout pour réussir avec Access : http://www.mpfa.info
Hello jobardu92 !
As-tu vérifié que la requête avec les paramètres correctement
renseignés ramenait bien quelque chose ?
Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon
de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
rcs.MoveLast
rcs.MoveFirst
message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée
suivante:
Bonjour!
Alors voilà, j'ai progressé dans mon code VBA pour me permettre de
récupérer le résultat d'une requête qui s'appelle "essai", et qui
dispose de 8 paramètres...
====================================================== > Dim rcs As DAO.Recordset
Dim qdf As DAO.QueryDef
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
message = rcs("Lib_client")
Set qdf = Nothing
========================================================= >
Quand j'exécute, il me met "aucun enregistrement en cours" à la ligne:
====== > message = rcs("Lib_client")
====== > Mes paramètres recoivent bien tous les champs de mon formulaire (j'ai
vérifié).
Aurais-je inversé des éléments dans mon code? Qu'est ce qui cloche?
Je voudrais en fait qu'une variable puisse stocker le ou les résultats
de ma requête d'ou le code VBA:
============================== > message = rcs("Lib_client")
============================= >
Mais ca ne fonctionne pas...
Merci!!!
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante:
Bonjour!
Alors voilà, j'ai progressé dans mon code VBA pour me permettre de récupérer le résultat d'une requête qui s'appelle "essai", et qui dispose de 8 paramètres... ====================================================== > Dim rcs As DAO.Recordset Dim qdf As DAO.QueryDef
qdf.OpenRecordset Set rcs = qdf.OpenRecordset message = rcs("Lib_client")
Set qdf = Nothing ========================================================= > Quand j'exécute, il me met "aucun enregistrement en cours" à la ligne: ====== > message = rcs("Lib_client") ====== > Mes paramètres recoivent bien tous les champs de mon formulaire (j'ai vérifié).
Aurais-je inversé des éléments dans mon code? Qu'est ce qui cloche?
Je voudrais en fait qu'une variable puisse stocker le ou les résultats de ma requête d'ou le code VBA:
============================== > message = rcs("Lib_client") ============================= > Mais ca ne fonctionne pas...
Merci!!!
-- Cordialement, Thierry
Tout pour réussir avec Access : http://www.mpfa.info
jobardu92
On 14 nov, 14:01, Thierry (ze Titi) wrote:
Hello jobardu92 !
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante:
Bonjour!
Alors voilà, j'ai progressé dans mon code VBA pour me permettre de récupérer le résultat d'une requête qui s'appelle "essai", et q ui dispose de 8 paramètres... ======================= ========================= ======= Dim rcs As DAO.Recordset Dim qdf As DAO.QueryDef
qdf.OpenRecordset Set rcs = qdf.OpenRecordset message = rcs("Lib_client")
Set qdf = Nothing ======================= ========================= ==========
Quand j'exécute, il me met "aucun enregistrement en cours" à la lig ne: ======= message = rcs("Lib_client") ======= Mes paramètres recoivent bien tous les champs de mon formulaire (j'ai vérifié).
Aurais-je inversé des éléments dans mon code? Qu'est ce qui cloch e?
Je voudrais en fait qu'une variable puisse stocker le ou les résultats de ma requête d'ou le code VBA:
Tout pour réussir avec Access :http://www.mpfa.info
Salut Thierry!
Effectivement, lorsque j'exécute ce code et que l'erreur se produit, en mode débugage, quand je survole mes paramètres, ils sont renseignés par les zones que j'ai saisi dans le formulaire.
Dans le cas où les client à bannir ne sont que 2 au lieu de 8, les 6 autres ont comme valeur "NULL".
Il me manque quelque chose mais quoi? Mystère...
Merci!!!
Pierrick
On 14 nov, 14:01, Thierry (ze Titi) <ze_titi_enlever-c...@tiscali.fr>
wrote:
Hello jobardu92 !
As-tu vérifié que la requête avec les paramètres correctement
renseignés ramenait bien quelque chose ?
Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon
de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
rcs.MoveLast
rcs.MoveFirst
message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée
suivante:
Bonjour!
Alors voilà, j'ai progressé dans mon code VBA pour me permettre de
récupérer le résultat d'une requête qui s'appelle "essai", et q ui
dispose de 8 paramètres...
======================= ========================= =======
Dim rcs As DAO.Recordset
Dim qdf As DAO.QueryDef
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
message = rcs("Lib_client")
Set qdf = Nothing
======================= ========================= ==========
Quand j'exécute, il me met "aucun enregistrement en cours" à la lig ne:
=======
message = rcs("Lib_client")
=======
Mes paramètres recoivent bien tous les champs de mon formulaire (j'ai
vérifié).
Aurais-je inversé des éléments dans mon code? Qu'est ce qui cloch e?
Je voudrais en fait qu'une variable puisse stocker le ou les résultats
de ma requête d'ou le code VBA:
Tout pour réussir avec Access :http://www.mpfa.info
Salut Thierry!
Effectivement, lorsque j'exécute ce code et que l'erreur se produit,
en mode débugage, quand je survole mes paramètres, ils sont renseignés
par les zones que j'ai saisi dans le formulaire.
Dans le cas où les client à bannir ne sont que 2 au lieu de 8, les 6
autres ont comme valeur "NULL".
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante:
Bonjour!
Alors voilà, j'ai progressé dans mon code VBA pour me permettre de récupérer le résultat d'une requête qui s'appelle "essai", et q ui dispose de 8 paramètres... ======================= ========================= ======= Dim rcs As DAO.Recordset Dim qdf As DAO.QueryDef
qdf.OpenRecordset Set rcs = qdf.OpenRecordset message = rcs("Lib_client")
Set qdf = Nothing ======================= ========================= ==========
Quand j'exécute, il me met "aucun enregistrement en cours" à la lig ne: ======= message = rcs("Lib_client") ======= Mes paramètres recoivent bien tous les champs de mon formulaire (j'ai vérifié).
Aurais-je inversé des éléments dans mon code? Qu'est ce qui cloch e?
Je voudrais en fait qu'une variable puisse stocker le ou les résultats de ma requête d'ou le code VBA:
Tout pour réussir avec Access :http://www.mpfa.info
Salut Thierry!
Effectivement, lorsque j'exécute ce code et que l'erreur se produit, en mode débugage, quand je survole mes paramètres, ils sont renseignés par les zones que j'ai saisi dans le formulaire.
Dans le cas où les client à bannir ne sont que 2 au lieu de 8, les 6 autres ont comme valeur "NULL".
Il me manque quelque chose mais quoi? Mystère...
Merci!!!
Pierrick
Thierry (ze Titi)
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access : http://www.mpfa.info
As-tu vérifié que la requête avec les paramètres correctement
renseignés ramenait bien quelque chose ?
Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon
de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
rcs.MoveLast
rcs.MoveFirst
message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée
suivante:
Il me manque quelque chose mais quoi? Mystère...
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access : http://www.mpfa.info
jobardu92
On 14 nov, 14:37, Thierry (ze Titi) wrote:
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci: ========================= =============== qdf.Parameters("bannir_client1") = bannir_client1.Value ========================= =============== il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL ^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur la fin qui lui pose problème. il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en cours" : ========================= ============== rcs.MoveFirst ========================= ==============
il y a peut etre une boucle a indiquer comme un "wile not rcs.eof....."
Merci!
On 14 nov, 14:37, Thierry (ze Titi) <ze_titi_enlever-c...@tiscali.fr>
wrote:
As-tu vérifié que la requête avec les paramètres correctement
renseignés ramenait bien quelque chose ?
Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon
de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
rcs.MoveLast
rcs.MoveFirst
message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée
suivante:
Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
--
Cordialement,
Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci:
========================= ===============
qdf.Parameters("bannir_client1") = bannir_client1.Value
========================= ===============
il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL
^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur
la fin qui lui pose problème.
il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en
cours" :
========================= ==============
rcs.MoveFirst
========================= ==============
il y a peut etre une boucle a indiquer comme un "wile not
rcs.eof....."
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci: ========================= =============== qdf.Parameters("bannir_client1") = bannir_client1.Value ========================= =============== il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL ^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur la fin qui lui pose problème. il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en cours" : ========================= ============== rcs.MoveFirst ========================= ==============
il y a peut etre une boucle a indiquer comme un "wile not rcs.eof....."
Merci!
Fabien
On 14 nov, 14:37, Thierry (ze Titi) wrote:
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit: qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client") En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci: ======================================= > qdf.Parameters("bannir_client1") = bannir_client1.Value ======================================= > il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL ^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur la fin qui lui pose problème. il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en cours" : ====================================== > rcs.MoveFirst ====================================== > il y a peut etre une boucle a indiquer comme un "wile not rcs.eof....."
Merci!
Salut,
dans ton précédent post je te proposais de regarder le contenu de ta requete en mode debug lors du plantage. debug.print qdf.sql Ca donne quoi ?
On 14 nov, 14:37, Thierry (ze Titi) <ze_titi_enlever-c...@tiscali.fr>
wrote:
As-tu vérifié que la requête avec les paramètres correctement
renseignés ramenait bien quelque chose ?
Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon
de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
rcs.MoveLast
rcs.MoveFirst
message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée
suivante:
Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
--
Cordialement,
Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci:
======================================= > qdf.Parameters("bannir_client1") = bannir_client1.Value
======================================= > il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL
^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur
la fin qui lui pose problème.
il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en
cours" :
====================================== > rcs.MoveFirst
====================================== >
il y a peut etre une boucle a indiquer comme un "wile not
rcs.eof....."
Merci!
Salut,
dans ton précédent post je te proposais de regarder le contenu de ta
requete en mode debug lors du plantage.
debug.print qdf.sql
Ca donne quoi ?
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit: qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client") En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci: ======================================= > qdf.Parameters("bannir_client1") = bannir_client1.Value ======================================= > il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL ^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur la fin qui lui pose problème. il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en cours" : ====================================== > rcs.MoveFirst ====================================== > il y a peut etre une boucle a indiquer comme un "wile not rcs.eof....."
Merci!
Salut,
dans ton précédent post je te proposais de regarder le contenu de ta requete en mode debug lors du plantage. debug.print qdf.sql Ca donne quoi ?
Fabien
On 14 nov, 14:37, Thierry (ze Titi) wrote:
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit: qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client") En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci: ======================================= > qdf.Parameters("bannir_client1") = bannir_client1.Value ======================================= > il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL ^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur la fin qui lui pose problème. il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en cours" : ====================================== > rcs.MoveFirst ====================================== > il y a peut etre une boucle a indiquer comme un "wile not rcs.eof....."
Merci!
Suite de la réponse sur le fil précédent ....
Ps : evite deux post sur le même sujet, surtout quant tu as des réponses sur le premier
On 14 nov, 14:37, Thierry (ze Titi) <ze_titi_enlever-c...@tiscali.fr>
wrote:
As-tu vérifié que la requête avec les paramètres correctement
renseignés ramenait bien quelque chose ?
Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon
de les parcourir. Quoiqu'il en soit:
qdf.OpenRecordset
Set rcs = qdf.OpenRecordset
rcs.MoveLast
rcs.MoveFirst
message = rcs("Lib_client")
En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée
suivante:
Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
--
Cordialement,
Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci:
======================================= > qdf.Parameters("bannir_client1") = bannir_client1.Value
======================================= > il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL
^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur
la fin qui lui pose problème.
il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en
cours" :
====================================== > rcs.MoveFirst
====================================== >
il y a peut etre une boucle a indiquer comme un "wile not
rcs.eof....."
Merci!
Suite de la réponse sur le fil précédent ....
Ps : evite deux post sur le même sujet, surtout quant tu as des réponses
sur le premier
As-tu vérifié que la requête avec les paramètres correctement renseignés ramenait bien quelque chose ? Par ailleurs, si elle ramène plusieurs enregistrements, il serait bon de les parcourir. Quoiqu'il en soit: qdf.OpenRecordset Set rcs = qdf.OpenRecordset rcs.MoveLast rcs.MoveFirst message = rcs("Lib_client") En ce jour mémorable du mercredi 14/11/2007, tu as émis l'idée suivante: Il me manque quelque chose mais quoi? Mystère...
A noter: si les paramètres sont des champs numériques, retire les "".
-- Cordialement, Thierry
Tout pour réussir avec Access :http://www.mpfa.info
AH...J'ai déjà trouvé un COUAC ^^.
déjà quand je mets ceci: ======================================= > qdf.Parameters("bannir_client1") = bannir_client1.Value ======================================= > il me met la valeur du champs comme = "PRIMAGAZ" à la place de NULL ^^!
Par contre ça bloque toujours... dès que j'appelle la variable RCS sur la fin qui lui pose problème. il m'indique l'erreur ici a chaque fois comme "aucun enregistrement en cours" : ====================================== > rcs.MoveFirst ====================================== > il y a peut etre une boucle a indiquer comme un "wile not rcs.eof....."
Merci!
Suite de la réponse sur le fil précédent ....
Ps : evite deux post sur le même sujet, surtout quant tu as des réponses sur le premier
