Comment récupérer les données d'une BD pour les mettre ds un comboBox en vb.net [Résolu]

Signaler
Messages postés
3
Date d'inscription
mardi 6 janvier 2004
Statut
Membre
Dernière intervention
17 juin 2005
-
Messages postés
28
Date d'inscription
vendredi 7 juillet 2006
Statut
Membre
Dernière intervention
22 août 2006
-
Bonjour à tous, je viens de débuter sur vb.net et je rencontre pas mal de soucis...
Je dois faire une application en vb.net associée à sql server

Mon problème est le suivant :

je voudrais récupérer des enregistrements (nom_secteur)d'une table (table secteur)
et les mettre les mettre dans une comboBox mais j'ai beau lire pleins de tuto je n'y arrive pas :s

g essayer ca mais (ca ne m'affiche rien) :
---------------------------------------------

Dim myConnection
As SqlConnection

Dim mySqlCommand
As SqlCommand

Dim resultat
As
String
Dim myReader
As SqlDataReader


myConnection =
New SqlConnection("Initial Catalog=testphp;Data Source=*****;UID=***;pwd=*********;")


mySqlCommand =
New SqlCommand("SELECT secteur_nom FROM sect_entreprise", myConnection)



Try


myConnection.Open()

myReader = mySqlCommand.ExecuteReader()

Do
While (myReader.Read())
ComboBox1.DataSource = myReader("secteur_nom").ToString()

Loop



Catch myException
As Exception
MsgBox("erreur")

Finally
myConnection.Close()

End
Try

---------------------------------------

et ca (une autre méthode)

'avant g créer un dataset avec l'assistant


ComboBox1.DataSource = DataSet11.Tables("sect_entreprise")
ComboBox1.DisplayMember = "secteur_nom"

Si vous pouvez m'aider ce serait super cool, j'essaye plein de trucs mais rien ne marche.
et j'ai pas trouvé de tuto qui me montre comment faire ...

3 réponses

Messages postés
3
Date d'inscription
mardi 6 janvier 2004
Statut
Membre
Dernière intervention
17 juin 2005

c bon g trouver !!! je suis trop bête, il fallait mettre le code dans mon form_load......
le code c au final :


Private
Sub Form1_Load(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles
MyBase.Load



Dim myConnection
As SqlConnection



Dim mySqlCommand
As SqlCommand



Dim resultat
As
String



Dim myReader
As SqlDataReader


myConnection =
New SqlConnection("Initial Catalog=....;Data Source=.......;UID=....;pwd=......;")


mySqlCommand =
New SqlCommand("SELECT secteur_nom FROM sect_entreprise", myConnection)



Try


myConnection.Open()


myReader = mySqlCommand.ExecuteReader()



Do
While (myReader.Read())


ComboBox1.Items.Add(myReader("secteur_nom"))



Loop


myReader.Close()



Catch myException
As Exception


MsgBox("erreur")



Finally


myConnection.Close()



End
Try



End
Sub
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 179 internautes nous ont dit merci ce mois-ci

Messages postés
3
Date d'inscription
mardi 6 janvier 2004
Statut
Membre
Dernière intervention
17 juin 2005

g trouver ca aussi mais ca ne marche pas non plus:


Dim myConnection
As SqlConnection

Dim mySqlCommand
As SqlCommand

Dim resultat
As
String
Dim myReader
As SqlDataReader


myConnection =
New SqlConnection("Initial Catalog=testphp;Data Source=*****;UID=***;pwd=*********;")


mySqlCommand =
New SqlCommand("SELECT secteur_nom FROM sect_entreprise", myConnection)



Try


myConnection.Open()

myReader = mySqlCommand.ExecuteReader()


ComboBox2.Items.Clear()



Do
While myReader.Read


ComboBox2.Items.Add(myReader("secteur_nom"))



Loop


myReader.Close()

si quelqu'un peut m'expliquer comment on fait ce serait super...
Messages postés
28
Date d'inscription
vendredi 7 juillet 2006
Statut
Membre
Dernière intervention
22 août 2006

Merci bien,
C vrai que moi aussi j'ai cherché avant de trouver ton code qui fonctionne !!!