liste de valeurs

Question

bonjour!
j'ai une zone de liste rempli avec une liste de valeurs. La zone de liste est composée d'un en-tête IDSite et NomSite. Le contenu de la liste est donc  sous la forme 
IDSite;NomSite;1;Site1;2;Site2;
quand il y a 2 sites dans la zone de liste.
Je voudrais pouvoir récupérer les valeurs de NomSite qui serviront pour une requete SQL. Un truc du genre SELECT NomSite FROM Site WHERE Forms!MonFormulaire!MaListe = Site.NomSite.
Pour résumer comment je peux récupérer les valeurs Site1 et Site2 de ma zone de liste???
j'espere avoir été clair!
merci.

cs_ITALIA · Answer

Pos1 = InStr(1, Combo1.Text, ";")
Pos2 = InStr(Pos1 + 1, Combo1.Text, ";")
Pos3 = InStr(Pos2 + 1, Combo1.Text, ";")
Pos4 = InStr(Pos3 + 1, Combo1.Text, ";")
Pos5 = InStr(Pos4 + 1, Combo1.Text, ";")
Pos6 = InStr(Pos5 + 1, Combo1.Text, ";")

NomSite1 = Mid(Combo1.Text, Pos3 + 1, (Pos4 - Pos3) - 1)
NomSite2 = Mid(Combo1.Text, Pos5 + 1, (Pos6 - Pos5) - 1)

It@li@

Renfield · Answer

ou tu  peux extraire les champs :


Dim a() as string
a = split("IDSite;NomSite;1;Site1;2;Site2;", ";")

NomSite1 = a(3)
NomSite2 = a(5)

The Praetorian · Answer

merci pour ces reponses!
mais ces solutions supposent qu'on connaisse le nombre de site présent dans la zone de liste, nan?
sinon ne pourrait-on pas convertir la liste de valeurs en table/requete comme origine source?

cs_ITALIA · Answer

Non je pense pas que ca soit faisable...

perso, ma methode est ameliorable

tu peux avoir combien de site ??
 

It@li@

Renfield · Answer

au pire, il t'es toujours possible d'effectuer un test, pour connaire le nombre de site dans le tableau...

NombredeSites = (Ubound(a)-1)/2

Renfield · Answer

Tu peux simplement faire :


Dim a() as string
a = split("IDSite;NomSite;1;Site1;2;Site2;", ";")

Dim i as integer
For i = 3 to Ubound(a) step 2
        MsgBox a(i)
next i

The Praetorian · Answer

ben le nombre de sites n'est pas fixe du tout mais il peut y en avoir des centaines... en fait j'avais besoin de 2 listes pour pouvoir faire des ajouts et des suppressions d'une liste à l'autre (du genre 2 listes avec les boutons ">", ">>", "<", "<<" ) et j'ai récupérer le prog d'un gars qui l'avait fait mais qui a du transformer la liste obtenue par requete en liste de valeurs pour simplifier sa prog... et mon but c'est de récupérer les noms des sites que l'utilisateur a choisis pour pour faire des requetes SQL... donc si qqn connait par hasard une autre implémentation possible de la gestion des 2 listes je suis preneur... en tout cas merci pour les réponses!!!

cs_ITALIA · Answer

Utilise sinon une petite base ACCESS ?

It@li@

The Praetorian · Answer

sinon j'arrive à récupérer les noms des sites en utilisant ta méthode Renfield... j'ai stocké les a(i) dans le code VB mais je voudrais savoir comment on fait pour les utiliser pour une comparaison dans une requete SQL? Faut écrire la requete SQL directement dans le code VB?

Liste de valeurs

9 réponses

Discussions similaires