afficher plusieurs champsRésolu

Question

Bonjour,

avec le code si dessous j'affiche bien les données dans ma listview "ListI"
par rapport au nom que j'ai sélectionné dans la combobox "liste_chantier"
comment faire pour affiché plusieurs champs avec la table "employe",car la j'affiche les données avec le champ "ch1" mais je voudrait afficher un autre champ "ch2" toujours en sélectionnant un nom dans ma combobox.

Private Sub liste_chantier_Click()  Call Connect    Sql = "Select * from client where Nom_Client='" & liste_chantier.Text & "'"    Rs.Open Sql, Db, adOpenStatic, adLockPessimistic    If Rs.RecordCount > 0 Then        Nom_chantier.Text = Rs.Fields("Ville_Client")    End If      Call Deconnect   valider_ClickEnd Sub

Private Sub valider_Click()TImport.Caption = 0ListI.ListItems.ClearCall ConnectSql = "Select * from employe  Where ch1='" & liste_chantier.Text & "'"        Rs.Open Sql, Db, adOpenStatic, adLockPessimistic    While Not Rs.EOF    Set ItemX = ListI.ListItems.add(, , Rs.Fields("code"))            ItemX.SubItems(1) = Rs.Fields("nom")            ItemX.SubItems(2) = Rs.Fields("prenom")            ItemX.SubItems(3) = Rs.Fields("num_secu")            ItemX.SubItems(4) = Rs.Fields("frais_total") ' & " €"            ItemX.SubItems(5) = Rs.Fields("ch1")            ItemX.SubItems(6) = Rs.Fields("ch2")                        ItemX.SubItems(7) = Rs.Fields("ch3")                                              TImport.Caption = (CDbl(TImport.Caption) + CDbl(Rs.Fields("frais_total"))) & " €"                        Rs.MoveNext    WendCall DeconnectEnd Sub
j'espère être clair ;)
merci
@+

cs_petchy · Answer

pour faire simple

comment faire pour récupérer un second champ dans ma requête 

Sql = "Select * from employe Where ch2='" & liste_chantier.Text & "'" 

voila
merci

ucfoutu · Answer

Bonjour,
j'ai des difficultés à te comprendre.
Ta requête, telle qu'écrite (ton *) , récupère la totalité des champs de la table employe (et donc également le champ ch2) répondant à ton critère.
Que veux-tu donc dire exactement ?
Es-tu vraiment certain du verbe (récupérer) que tu emploies ?
 
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend

cs_petchy · Answer

en fait c'est pas facile d'expliquer
le verbe "récupérer" n'est pas bien employer.
je récupère bien les champs dans ma listview ca pas de problème
exemple
dans ma table j'ai plusieurs champ

champ ---> ch1     ch2     ch3    ch4    ch5
données-->   a         b        a       a        d 
si je sélectionne dans le combobox  "a"
je voudrais que dans ma listview j'ai les lignes ch1,ch3 et ch4 qui s'affiche
si je sélectionne dans le combobox "d"
je voudrais que dans ma listview j'ai la lignes ch5 qui s'affiche
c'est pour ça que je voudrais rajouter dans ma requete des autres champs.
merci

ucfoutu · Answer

Toujours pas vraiment clair.
S'il ne s'agit que d'affichage, affiche donc tous tes champs et cache (en fonction de ton choix dans la combo) ceux que tu ne veux pas voir !
Tu peux dimensionner les colonnes de la listview comme tu l'entends
Une colonne dont la largeur est mise à 0 devient invisible ...

cs_ShayW · Answer

Bonjour

Ta table me semble pas conforme 
selon ton ex 
dans ma table j'ai plusieurs champ 
champ ---> ch1 ch2 ch3 ch4 ch5 
données--> a b a a d 
 pourquoi avoir plusieurs champs avec les memes  données 
décris ta table et les champs ch1.....

cs_petchy · Answer

bonjour
les données de ma table "employe" viennent d'une autre table,c'est pour ça que l'ont peut avoir les memes données.
je voudrais qui affiche dans la listview
j'ai essayé  
from employe Where ch1 and ch2 and ch3
mais il affiche que les données du champ ch3

cs_petchy · Answer

j'utilise comme base ACCES
dans ma table j'ai 15 champs,les items du combobox viennent du autre table.
donc quand je sélectionnent un item dans mon combobox,je doit affiche dans la listview les lignes qui sont concernées par ma sélection.

voila,je ne sait pas si c'est plus clair :(

cs_petchy · Answer

voila le code et ma table
désolé de vous importuné avec ça

Sql = "Select * from employe Where ch1='" & liste_chantier.Text & "'_"or  ch2='" & liste_chantier.Text & "' _ or  ch3='" & liste_chantier.Text & "' _ or  ch5='" & liste_chantier.Text & "' _"

TABLE "employe"
code -----------> num auto
num_secu -----> Texte court	
nom	-----> Texte court
prenom	
adresse	ville	-----> Texte court
tel_port -----> Texte court	
tel_domicile -----> Texte court	
mail	-----> Texte court
date_naissance	-----> Texte court
frais_hotel	-----> Texte court
frais_carburant	-----> Texte court
frais_parking	-----> Texte court
frais_autoroute	-----> Texte court
frais_autres	-----> Texte court
frais_total	-----> Texte court
Nom_Client	-----> Texte court
Ville_Client	-----> Texte court
Code_Client	-----> Texte court
cout_mo	temps_mo -----> Texte court	
total_mo	-----> Texte court
ch1	-----> Texte court
ch2	-----> Texte court
ch3	-----> Texte court
ch4	-----> Texte court
ch5	-----> Texte court

merci beaucoup pour votre aide

cs_ShayW · Answer

Bonjour
D'après moi les champs 
frais_hotel -----> Texte court 
frais_carburant -----> Texte court 
frais_parking -----> Texte court 
frais_autoroute -----> Texte court 
frais_autres -----> Texte court 
frais_total -----> Texte court 
 
doivent etre dans un autre tableau avec le code -----------> num auto  de la table employé
Tableau Frais
code -----------> num auto  
 frais_hotel -----> Texte court 
frais_carburant -----> Texte court 
frais_parking -----> Texte court 
frais_autoroute -----> Texte court 
frais_autres -----> Texte court 
frais_total -----> Texte court 
code provenant du tableau employé 

est ce que tous les champs frais appartient à l'employé ?

l'employé peut avoir plusieurs clients mais le client  a un seul employé ?

si c'est le cas il faut un tableau client avec les champs
Code_Client -----> Texte court 
Nom_Client -----> Texte court 
Ville_Client -----> Texte court 
code provenant du tableau employé 

et dans le tableau employé retirer les champs 
Code_Client -----> Texte court 
Nom_Client -----> Texte court 
Ville_Client -----> Texte court 

possible que ce n'est pas correcte 
c'est quoi les champs suivants 
cout_mo temps_mo -----> Texte court 
total_mo -----> Texte court 
ch1 -----> Texte court 
ch2 -----> Texte court 
ch3 -----> Texte court 
ch4 -----> Texte court 
ch5 -----> Texte court

jordane45 · Answer

Essayes ça :
valChamp = liste_chantier.TextSql = "Select * from employe Where ch1='" & valChamp & "' or ch2='" & valChamp & "' or ch3='" & valChamp & "' or ch5='" & valChamp & "'" 

Si le souci persiste, essaye chaque "ch"  seul.
exemple :
valChamp = liste_chantier.TextSql = "Select * from employe Where ch1='" & valChamp & "'
 
valChamp = liste_chantier.TextSql = "Select * from employe Where ch2='" & valChamp & "'

Etc..

NB: J'ai sorti la variable (valChamp ) pour une meilleur lisibilité... ce n'est pas obligatoire

cs_petchy · Answer

bonjour,

merci beaucoup Jordane , ça fonctionne super bien.

bonne journée

petchy

Afficher plusieurs champs

11 réponses

Votre réponse

Discussions similaires