utilisation du contenu d'une liste dans une requete Résolu

Question

slt,
Je  developpe avec vba  access,   quand j'essai  d'utiliser   le contenu d'une  d'une  variable  dans une  requete sql,   ca marche pas , un  message affiche: trop peu de parametres 1 attendu!  .Par  exemple dans ce code je  voudrai utiliser le contenu  de ma  liste   pour  executer une requete  sql  et  afficher le  resultat dans un  formulaire
Si  vous savez  resoudre ce genre de probleme ou un autre de ce genre ; faites moi  de propositions SVP

Private Sub Commande17_Click()
Dim db As DAO.Database, rst As DAO.Recordset, fld As DAO.Field
   
    Set db = CurrentDb
    
        sSQL "select Code_composant FROM Tcomposant where designation LIST4.Value ;"
    
    
    Set rst = db.OpenRecordset(sSQL, dbOpenForwardOnly, dbReadOnly)
    While Not rst.EOF


Cco = rst(0)
rst.MoveNext


    
    
    Wend
    
    rst.Close

cs_MPi · Accepted Answer

Essaie celle-ci dans ce cassSQL "select Code_composant FROM Tcomposant where designation '" & LIST4.Text & "'"

Si la sélection de List4 peut contenir des apostrophes, il te faudra les doubler. Replace peut être incorporé à la requête pour forcer le doublage.sSQL "select Code_composant FROM Tcomposant where designation '" & Replace(LIST4.Text, "'", "''") & "'"

MPi

jrivet · Answer

Salut, C'est normal essaies plutot: sSQL "select Code_composant FROM Tcomposant where designation " & LIST4.Value & ";" @+: Ju£i?n Pensez: Réponse acceptée

cs_DARKSIDIOUS · Answer

C'est quoi le rapport avec VB.NET si tu fait du vba ???

Je déplace vers le bon forum !

Hunksit · Answer

Salut   Ju£i?n
Ce  que  tu  m'as  donné  ne marche pas aussi  parceque list4.Value est  de type  string , donc y  a une erreur  de  syntaxe ,il  me  faut  alors un moyen  de mettre le  string entre  griffe ('') en  faisant  attention car  si  je met 'list4.Value'  le  resultat de la requete est  fause  car  la  requete  va  chercher le  code_composant ou la  designation = au  string( list4.value  )  ce  qui   est  faut !


si  t as d'autres propositions!!!!

jrivet · Answer

Salut, et bien si il faut l'entourer de ' ' essaie ceci (question de logique). sSQL "select Code_composant FROM Tcomposant where designation '" & LIST4.Value & "';" Si ce n'est pas ca il faut savoir de quel type est designation dans ta table. @+: Ju£i?n Pensez: Réponse acceptée

Hunksit · Answer

Slt  Julien
Je te remerci pour tes propositions , mais celle  la non plus elle ne marche pas ,  designation  est  un  champ  de type  texte donc le  contenu est   de  type  string;
merci  encore et  si  t'as d'autres proposition !!!!

cs_Exploreur · Answer

Salut,

Essaye peut-être comme cela dans ta requête:

 '" & List4.List(List4.ListIndex) & "'" 

A+
Exploreur

 Linux a un noyau, Windows un pépin

jrivet · Answer

Salut,
Le mieux est de faire un Msgbox de ta requete avant de l'executer pour voir si elle te semble correcte. 

Est ce que elle retournera bien un résultat.

@+: Ju£i?n
Pensez: Réponse acceptée

Hunksit · Answer

Ca a marché finalement , ta methode étais la bonne , 
 merci Mpi et  à tous ceux m'ont  fait  des propositions

chaibat05 · Answer

Salut,

t' as bien une ligne sélecionneé au moins ?
si c' est pas le cas , List4.Text renvoie Null

<hr />® l l i n g , l' agité du bocal : 
   ...quotes, double quotes, crochets ou parenthèses ?
   Ah si je pouvais rester dans mes charentaises !

cs_MPi · Answer

Salut Chaibat,
effectivement, il faudrait éventuellement vérifier l'état de List4.text avant d'appeler la requête... ou encore sélectionner le 1er item par défaut lors du chargement de la liste.

MPi

Utilisation du contenu d'une liste dans une requete

11 réponses

Votre réponse

Discussions similaires