[VB6] Variable = Valeur d'une requete Select

**bb62** · 23/01/2006, 10h18

Bonjour à tous,

Est ce qu'il est possible de donnée une valeur à une variable : var1, la valeur d'une requete Select.

Je m'explique j'ai :
- une variable var1 qui est un string
- une requete sql :

Code :

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

"Select Champ1 From Table Where Champ2 = " & Text1.Text

- Et j'aimerai que:

Code :

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

var1 = Valeur( "Select Champ1 From Table Where Champ2 = " & Text1.Text)

Pouvez-vous m'aider?

Merci d'avance.

**AlainTech** · 23/01/2006, 10h37

Récupère le résultat de l'exécution de ta requête.

**bb62** · 23/01/2006, 10h39

Comment il faut faire?

Peux-tu m'aider?

Merci d'avance.

**AlainTech** · 23/01/2006, 10h40

Je pars maintenant, désolé.

Je suis certain que d'autres pourront te répondre.

**bb62** · 23/01/2006, 11h25

J'ai fait ce code suivant :

Code :

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

1
2
3
 
Dim numvac As String
numvac = "Select Code_Vacation from Vacation Where Libellé_Vacation =" & Text1.Text

et quand je fais un msgBox sur numVac il me marque:
Select Code_Vacation from Vacation Where Libellé_Vacation = bbb

Pouvez-vous m'aidez?

Merci d'avance

**jmfmarques** · 23/01/2006, 11h34

T'aider comment et à quoi ??
Tu as ce que tu voulais, il me semble (ta requête dans une variable... c'était bien là ta question, n'est-ce pas ? A moins que ta question n'en cache une autre, qu'il faut alors que tu apprennes à poser...)

:

**bb62** · 23/01/2006, 11h40

Ta pa lu mon post au dessus.

J'ai dit que lorsque je fait un msgBox sur ma variable numvac au lieu de me mettre le Code_Vacation correspondant à ma requete et donc comme valeur 1, 2 ou 3. Il ecrit la requete entière c'est à dire : Select Code_Vacation from Vacation Where Libellé_Vacation = bbb.
Et moi j'aimerai soit 1, 2 ou 3 et se chiffre doit correspondre au code_vacation de la vacation bbb.

Pouvez-vous m'aider?

Merci d'avance.

**jmfmarques** · 23/01/2006, 11h49

Je répète donc (mais ce sera la dernière fois) :

Ta variable numvac contient ta requête, puisque tu l'as ainsi définie.

Pour le reste, me semble-t-il, ce sera le résultat de l'exécution de ta requête...

**bb62** · 23/01/2006, 11h53

Et comment tu fais pour avoir le resultat de la requete dans une textBox, par exemple?

**jmfmarques** · 23/01/2006, 12h07

En d'autres termes : comment exécuter une requête et récupérer les résultats ?

Réponse :

D'autant que j'ai vu passer, il y a moins d'une semaine, une question sur ce sujet.

**blaiso** · 23/01/2006, 12h55

salut,

il faut declarer ta connexion à la base (je suppose que c'est fait). ensuite tu recupere le resultat dans le curseur (je presume que c'est dans vb).
un truc du genre

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim setuser As New ADODB.Recordset
Dim devep As Connection
Set devep  = New Connection
Dim numvac, recup As String
numvac = "Select Code_Vacation from Vacation Where (Libellé_Vacation ='" & Text1 & "')"
 setuser.CursorLocation = adUseServer
    setuser.Open numvac , devep, adOpenKeyset, adLockOptimistic, adCmdText
 
     recup = setuser!Code_Vacation 'c'est ici que tu recuperes le resultat de ta requete
    'MsgBox setuser!Code_Vacation  'si tu veux le message
Set setuser = Nothing

je presume qu'il n'ya qu'une seule code_vacation!
s'il y a plusieurs valeurs à recuperer, tu fais une boucle pour avoir toutes les valeurs contenues dans le curseur.
@+