Discussion :

[chaima01]

bonsoir ,

j'ai 2 tables :

serveur ( num_serie(clé_primaire),nom,code_marque,adresse_ip)

marques( code_marque (clé_primaire),nom_marque)

je veux réaliser une requete qui permet d'afficher le nom de la marque suivant code_marque. j'utilise vb6.
voici mon essai

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Rs3.Open "select * from marques ", cnn, adOpenKeyset, adLockOptimistic
If Rs3.RecordCount > 0 Then
     i = 1
     Rs3.AbsolutePosition = 1
    MSFlexGrid1.Rows = 1
     Do While Not Rs3.EOF
       MSFlexGrid1.Rows = MSFlexGrid1.Rows + 1
      c = Rs3.Fields("nom_marque")
     i = i + 1
       Rs3.MoveNext
     Loop
   End If
 
  Rs.Open "select * from serveur", cnn, adOpenKeyset, adLockOptimistic
 
  If Rs.RecordCount > 0 Then
     i = 1
     Rs.AbsolutePosition = 1
     MSFlexGrid1.Rows = 1
     Do While Not Rs.EOF
       MSFlexGrid1.Rows = MSFlexGrid1.Rows + 1
       MSFlexGrid1.TextMatrix(i, 1) = Rs.Fields(0)
       MSFlexGrid1.TextMatrix(i, 2) = Rs.Fields(1)
 
     MSFlexGrid1.TextMatrix(i, 3) = c
 
       MSFlexGrid1.TextMatrix(i, 4) = Rs.Fields(3)
 
 
       i = i + 1
       Rs.MoveNext
     Loop
   End If
 
     Rs.Close

rs3.close
le probléme c'est que dans l'exécution le champ nom marque est vide

svp aider moi

[SQLpro]

VB n'ayant rien à voir avec SQL, je doute que vous obteniez une quelconque réponse. Postez dans le forum approprié ! Documentez votre demande et indentez votre code avec la balise CODE.

A +

[iberserk]

VB n'ayant rien à voir avec SQL, je doute que vous obteniez une quelconque réponse. Postez dans le forum approprié ! Documentez votre demande et indentez votre code avec la balise CODE.

A +

Et retirez moi ces SELECT *, dans la cas des marques vous ne vous servez que d'une colonne par exemple!!!