Bonjour à vous tous,

Pourriez-vous m'expliquer comment en sélectionnant un item dans mon combobox (qui correspond aux données d'un champ de ma base  access) je peux afficher le contenu des autres champs de ma base dans des textbox ?
Je ne sais pas comment trop m'y prendre
Merci beaucoup
A+

Salut,

question qui revient souvent sur le forum, comme aujourd'hui, fais cela avec une requête SQL de séléction...

    ' Préparation de la requêtes
     Sql = "SELECT * FROM TaTable WHERE TonChamp = '" & combo1.text & "'"

Puis tu fait :

Tonrecordset.open SQL, TaconnectionBase, adOpenDynamic, adLockPessimistic

Tu n'as plus cas récupérer ce que contien ton recordset et l'afficher où tu veux...dans des textbox, listview...autres...

A+
Exploreur

 

ça doit ettre un trucdu genre...

tampon = Cbox.text

requete="select champ1, champ2,... from nomTable where champ1=""" & tampon &"""

dim maCommande as new oledbcommand(requete,uneConnection)
dim monReader as oledbdatareader

monReader=maCommande.executeReader

monReader.read
if monReader.Hasrows then
   TxtBox2=monReader("champ2")
   TxtBox3=monReader("champ3")
end if

 

a mon avis tu vas mettre une requete genre: t= select * from nom_de_la_table"
et apres tu vas mettre:
le nom de le zone de texte= t ![leNomDuCampsDansBD]

exp:
Private Sub NC_Click(Area As Integer)
If NC <> "" Then
ouvrirbase
Set t = b.OpenRecordset("select * from client where [num_client]='" + NC + "'")
NM = t!nom_client
TEL = t![tel_client]
End If
End Sub

un exemple qui marche chez moi :

d'abord tu mets dans le combobox

PrivateSub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
' infos d'apres la selection 
LoadInfo(ComboBox1.SelectedItem.ToString)
EndSub

et ensuite tu developpes une sub "loadinfo" (pour rester dans mon exemple dessus)
où tu colles tout ce que tu veux par rapport à la selection
textbox.text=
etc...