Comment remplir une dropdownlist avec une requête ? voila la solution

Commenter

Contenu du snippet

voila du code pour remplir un DropDownList avec le résultat d'une requête sql

Source / Exemple : 


Imports System.Data.SqlClient

'voila comment on l'appel 
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
           init_DropDownList("nom base de données", requete1, DropDownList1, "champ à afficher ici tutu", "la clé qui lui correspond disons tata")
            DropDownList1.Items.Insert(0, "<--------------selectionner-------------->")
        End If

    End Sub

'voila la procédure qui le gère
Sub init_DropDownList(ByVal BDD As String, ByVal requete As String, ByRef ld As DropDownList, ByVal TextField As String, ByVal ValueField As String)

       '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")

        ld.DataSource = DS.Tables("temp").DefaultView

        ld.DataTextField = TextField

        ld.DataValueField = ValueField

        ld.DataBind()

         MyConnection.Close()

    End Sub

Conclusion :


open source y'a que ca de vrai

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (tribals)