Je cherche =E0 faire un tirage al=E9atoire sous la forme suivante :
Sur mon form, j'ai une zone de liste contenant des noms et autant de
zones de texte que de noms.
J'aimerai que sur clic d'un bouton, il y ait un tirage al=E9atoire des
noms contenus dans la zone de liste et que cela remplisse les zones de
texte (celles-ci sont nomm=E9es num=E9riquement/ ex : Txtbox1,... , TxtboxN)
jusqu'=E0 ce qu'il n'y ait plus de noms dans la liste.
Je n'arrive pas =E0 mettre en place cette fonction. Qqun aurait-il une
id=E9e ?
il manque un [ Set Rs = Db.OpenRecordset("SELECT IdClient, Nompre, Societe, aleatoire([idclient]) AS Ordre FROM TblClient ORDER BY aleatoire([idclient]);")
sur aleatoire(IdClient]);")
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ Pour débuter sur le forum: http://www.mpfa.info/
Le multimédia vu par Windows Vista, Office 2007 et Windows Live !!! http://www.comscamp.com/Tracker/Redirect.ashx?linkid°64304e-439a-45c7-9d2f-c3326db58273
"LeSoviet" a écrit dans le message de news:
Bonjour Raymond,
J'ai suivi tes conseils (création de la fonction dans un module, création d'une requête ou non, code sur chargement du formulaire...) mais j'ai un message d'erreur (3061 : trop peu de paramètres. 1 attendu) sur cette ligne : Set Rs = Db.OpenRecordset("SELECT IdClient, Nompre, Societe, aleatoire([IdClient]) AS Ordre FROM TblClient ORDER BY aleatoire(IdClient]);")
Merci beaucoup pour ton aide
Bonjour.
il manque un [
Set Rs = Db.OpenRecordset("SELECT IdClient, Nompre, Societe,
aleatoire([idclient]) AS Ordre FROM TblClient ORDER BY
aleatoire([idclient]);")
sur
aleatoire(IdClient]);")
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Le multimédia vu par Windows Vista, Office 2007 et Windows Live !!!
http://www.comscamp.com/Tracker/Redirect.ashx?linkid°64304e-439a-45c7-9d2f-c3326db58273
"LeSoviet" <gil.nat@caramail.com> a écrit dans le message de news:
1180513247.122900.171480@q69g2000hsb.googlegroups.com...
Bonjour Raymond,
J'ai suivi tes conseils (création de la fonction dans un module,
création d'une requête ou non, code sur chargement du formulaire...)
mais j'ai un message d'erreur (3061 : trop peu de paramètres. 1
attendu) sur cette ligne :
Set Rs = Db.OpenRecordset("SELECT IdClient, Nompre, Societe,
aleatoire([IdClient]) AS Ordre FROM TblClient ORDER BY
aleatoire(IdClient]);")
il manque un [ Set Rs = Db.OpenRecordset("SELECT IdClient, Nompre, Societe, aleatoire([idclient]) AS Ordre FROM TblClient ORDER BY aleatoire([idclient]);")
sur aleatoire(IdClient]);")
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ Pour débuter sur le forum: http://www.mpfa.info/
Le multimédia vu par Windows Vista, Office 2007 et Windows Live !!! http://www.comscamp.com/Tracker/Redirect.ashx?linkid°64304e-439a-45c7-9d2f-c3326db58273
"LeSoviet" a écrit dans le message de news:
Bonjour Raymond,
J'ai suivi tes conseils (création de la fonction dans un module, création d'une requête ou non, code sur chargement du formulaire...) mais j'ai un message d'erreur (3061 : trop peu de paramètres. 1 attendu) sur cette ligne : Set Rs = Db.OpenRecordset("SELECT IdClient, Nompre, Societe, aleatoire([IdClient]) AS Ordre FROM TblClient ORDER BY aleatoire(IdClient]);")
Merci beaucoup pour ton aide
LeSoviet
Re,
ça ne change rien, j'ai toujours le même message d'erreur.
Merci beaucoup pour ton aide, et ta patience
Re,
ça ne change rien, j'ai toujours le même message d'erreur.
ça ne change rien, j'ai toujours le même message d'erreur.
Merci beaucoup pour ton aide, et ta patience
Raymond [mvp]
je viens de retester car j'avais gardé la base essais et ça fonctionne bien. n'y a-t-il pas de faute d'orthographe dans les noms ? copie l'instruction sql dans une requête vierge et exécute la. ça marche ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ Pour débuter sur le forum: http://www.mpfa.info/
Le multimédia vu par Windows Vista, Office 2007 et Windows Live !!! http://www.comscamp.com/Tracker/Redirect.ashx?linkid°64304e-439a-45c7-9d2f-c3326db58273
"LeSoviet" a écrit dans le message de news:
Re,
ça ne change rien, j'ai toujours le même message d'erreur.
Merci beaucoup pour ton aide, et ta patience
je viens de retester car j'avais gardé la base essais et ça fonctionne bien.
n'y a-t-il pas de faute d'orthographe dans les noms ?
copie l'instruction sql dans une requête vierge et exécute la. ça marche ?
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Le multimédia vu par Windows Vista, Office 2007 et Windows Live !!!
http://www.comscamp.com/Tracker/Redirect.ashx?linkid°64304e-439a-45c7-9d2f-c3326db58273
"LeSoviet" <gil.nat@caramail.com> a écrit dans le message de news:
1180514516.256425.170740@h2g2000hsg.googlegroups.com...
Re,
ça ne change rien, j'ai toujours le même message d'erreur.
je viens de retester car j'avais gardé la base essais et ça fonctionne bien. n'y a-t-il pas de faute d'orthographe dans les noms ? copie l'instruction sql dans une requête vierge et exécute la. ça marche ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ Pour débuter sur le forum: http://www.mpfa.info/
Le multimédia vu par Windows Vista, Office 2007 et Windows Live !!! http://www.comscamp.com/Tracker/Redirect.ashx?linkid°64304e-439a-45c7-9d2f-c3326db58273
"LeSoviet" a écrit dans le message de news:
Re,
ça ne change rien, j'ai toujours le même message d'erreur.
Merci beaucoup pour ton aide, et ta patience
LeSoviet
Re,
En remplaçant TblClient par ReqClient dans Set Rs =..., ça fonctionne.
Je pourrait écrire des tartines de remerciements pour tes conseils et les solutions pour résoudre les problèmes.
Un très grand MERCI RAYMOND
Re,
En remplaçant TblClient par ReqClient dans Set Rs =..., ça fonctionne.
Je pourrait écrire des tartines de remerciements pour tes conseils et
les solutions pour résoudre les problèmes.
