cs_krousty
Messages postés29Date d'inscriptionmardi 17 mai 2005StatutMembreDernière intervention25 mai 2008
-
3 juin 2005 à 15:55
cs_krousty
Messages postés29Date d'inscriptionmardi 17 mai 2005StatutMembreDernière intervention25 mai 2008
-
6 juin 2005 à 11:04
bonjour,
je souhaitai parcourir le resultat d une reque dans un formulaire pour cela javais fais :
Private Sub Commande16_Click()
Dim res As String
Dim bd As Database
Dim matable As Recordset
Set bd = CurrentDb
Set matable = bd.OpenRecordset("requête1")
matable.MoveFirst
Do While Not matable.EOF
res = res & TextASCII(txt1) & TextASCII(txt2) & TextASCII(txt3) & TextASCII(txt4)
matable.MoveNext
Loop
matable.Close
DoCmd.OpenForm "reception", , , , acFormReadOnly
Forms!reception!recoi = res
End Sub
mais une ereure surviens aux niveau de : Set matable = bd.OpenRecordset("requête1")
"trop peu de parametre atendu" si vous pouviez me renseigné sur le type de parametre maquand ( je suis sou access 97)
je vous remercie et atend vos reponse ac impatiente
merci encore
@ bientot
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200621 3 juin 2005 à 16:24
Salut,
Je suppose que ta "requête1" est une requête créée avec l'assistant d'access ? Dans ce cas, est-ce qu'elle fonctionne quand tu l'exécutes manuellement ?
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
tbbuim1
Messages postés940Date d'inscriptionjeudi 20 février 2003StatutMembreDernière intervention 3 février 20119 3 juin 2005 à 16:55
Ouais je connais c super chiant ça!
Alors tu as 2 solutions (peut être plus mais moi j'en ai trouvé 2 )
Soit, tu crées une table temporaire qui récupère le résultat de ta
requête et tu fais ton recordset sur la table tempo (là c sur de
marcher à 100%) puisque aucun paramètre!
Soit, tu dois écrire les critères d'une manière spéciale genre au lieu de mettre
SELECT machin FROM truc WHERE machin = forms!bidule.machin
tu dois écrire
SELECT machin FROM truc WHERE machin = " & forms!bidule.machin & ";"
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200621 3 juin 2005 à 17:33
Puisque, je te cite : une ereure surviens aux niveau de : Set matable = bd.OpenRecordset("requête1") "trop peu de parametre atendu"
J'insiste, est-ce ta requête fonctionne en l'exécutant sous access ?
Ce type d'erreur survient lorsque tu as une clause where qui fait une comparaison entre un champ et une valeur de types différents.
Montre ta requête, on pourra mieux t'aider.
D'autre part, je ne comprend pas :
Do While Not matable.EOF
res = res & TextASCII(txt1) & TextASCII(txt2) & TextASCII(txt3) & TextASCII(txt4)
matable.MoveNext
Loop
C'est quoi TextASCII(...) ? et txt1, ......, txt4 ?
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
cs_krousty
Messages postés29Date d'inscriptionmardi 17 mai 2005StatutMembreDernière intervention25 mai 2008 6 juin 2005 à 11:04
ma requete et la suivante :
SELECT afichages.numafichages, afichages.nbpages, afichages.[tps en sec], pages.txt1, pages.txt2, pages.txt3, pages.txt4, pages.numpages
FROM afichages INNER JOIN pages ON afichages.numafichages = pages.numafichages
WHERE (((afichages.numafichages)=[pages].[numafiches]));
TextASCII(txt1) & TextASCII(txt2) & TextASCII(txt3) & TextASCII(txt4) sont des zone 4 zone de texte elle se situe sur chaque lignet elle son ici convertie en ascii