Discussion :

[paleronel]

J'ai un probleme
au fait j'ai essaye de recupere une valeur dans une ListView que je veux utiliser le resultat dans un requete mais ca marche pas.
voici la partie qui me derange

dim str as integer
str=ListView.SelectedItems(0).Items(0).Text(0)

quand je veux utiliser le resultat comme suit :

...="select IDContractor, IDEmploye, FirstName AS TEmploye " _&
"Where IDContractor = str" Ca marche pas.

je veux d'aide
merci

[Gdal]

Salut,

...="select IDContractor, IDEmploye, FirstName AS TEmploye " _&
"Where IDContractor = str" Ca marche pas.

Essai plutôt

Code Vb.net :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
WHERE IDContractor = '" & str & "';"

En fait, avec ton code ta requête recherche le mot str dans IDContractor .
Lorsque tu fabriques une chaîne et que tu dois y insérer des valeurs de variables, utilises &, exemple:

Code Vb.net :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim strName as String
strName = "Gwendal"
MessageBox.show("Mon prénom est: " & strName & "")

Autrement (je ne connais pas l'utilisation des ListView), es-tu sur que certe partie de code fonctionne:

Code Vb.Net :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
dim str as integer
str=ListView.SelectedItems(0).Items(0).Text(0)

Pour vérifier la valeur retournée, tu peux placer un point d'arrêt sur cette ligne, exécuter ton code, avancer d'un pas, et place le curseur de ta souris sur [b]str[/] dans sa déclaration.

Bonne continuation

Gwendal

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim str as integer
str=ListView.SelectedItems(0).Items(0).Text(0)

ne marchera pas. Tu indexes deux fois ton item: une premiètre fois dans SelectedItems, une deuxième dans Items. De plus la propriété .Text n'accepte pas de paramètre (0) ou quoi que ce soit d'autre.

Il faut écrire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim str as integer
 str=ListView.SelectedItems(0).Text

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim str as integer
 str=ListView.SelectedItems.Item(0).Text