COMMENT REMPLIR UNE DROPDOWNLIST AVEC UNE REQUÊTE ? VOILA LA SOLUTION
jesusonline
Messages postés
6814
Date d'inscription
dimanche 15 décembre 2002
Statut
Membre
Dernière intervention
13 octobre 2010
-
28 avril 2004 à 16:25
mimosa803 Messages postés 345 Date d'inscription jeudi 15 février 2007 Statut Membre Dernière intervention 24 avril 2010 - 28 févr. 2008 à 16:20
mimosa803 Messages postés 345 Date d'inscription jeudi 15 février 2007 Statut Membre Dernière intervention 24 avril 2010 - 28 févr. 2008 à 16:20
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/22359-comment-remplir-une-dropdownlist-avec-une-requete-voila-la-solution
https://codes-sources.commentcamarche.net/source/22359-comment-remplir-une-dropdownlist-avec-une-requete-voila-la-solution
28 févr. 2008 à 16:20
J'ai exécuter le code et que je sélectionne un item, le dropdownliste se positionne toujours sur le 1 er élément.
Merci
31 août 2005 à 22:37
Personnellement, en appliquant cette méthode avec un datasource (Framework V2) autoalimenté, l'insert n'a aucun effet.
Auriez-vous une piste à me fournir ?
Merci d'avance,
25 mai 2004 à 18:00
28 avril 2004 à 17:24
DropDownList1.DataTextField = TextField
DropDownList1.DataValueField = ValueField
mais ta remarque permet une autre approche ;-) ce qui n'est pas négligeable
merci pour ton message, j'adore les critiques ça permet d'avancé
28 avril 2004 à 16:25
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ChoixPoste.Text = "choisir le poste"
Dim requete1 As String = "select tutu,tata from titi"
if Not IsPostBack Then
DropDownList1.Datasource = init_DropDownList("nom base de données", requete1)
DropDownList1.DataTextField = TextField
DropDownList1.DataValueField = ValueField
DropDownList1.Items.Insert(0, "<--------------selectionner-------------->")
DropDownList1.DataBind()
End If
End Sub
function init_DropDownList(ByVal BDD As String, ByVal requete As String as dataview
'connection a la base de données
MyConnection = New SqlConnection
MyConnection.ConnectionString = "server='nom machine';database='nom base de données';user id='user';password='mot de passe';Trusted_Connection=true"
MyConnection.Open()
Dim MyCommand As New SqlDataAdapter(requete, MyConnection)
Dim DS As DataSet = New DataSet
MyCommand.Fill(DS, "temp")
return DS.Tables("temp").DefaultView
MyConnection.Close()
End Sub
mais ca reste un bon exemple :)