Bd access dans une listbox


Contenu du snippet

Faut juste changer le lien de la base et le champ à afficher dans la textbox

Source / Exemple :


<%@ Page Language="VB" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.Oledb" %>
<script runat="server">

    Sub Page_Load(sender As object,e As eventargs)
    
        Dim DBobjConn As OleDBConnection
        DBobjConn = New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.MapPath("ma base.mdb"))
        DBobjConn.Open()
    
    
    
        Dim ODDA_ModifTable As New OleDBCommand("SELECT * FROM table",dbobjconn)
    
    
    
         Dim malecture AS OleDbDataReader
    
         malecture=ODDA_ModifTable.ExecuteReader
    
         do until not malecture.read
    
        ListBox1.Items.Add(malecture("Champ1"))
    
         loop
    
         malecture.Close
    
         DBobjConn.Dispose
    
    
    End Sub
    
    Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs)
    
    End Sub

</script>
<html>
<head>
</head>
<body>
    <form runat="server">
<asp:ListBox id="ListBox1" runat="server" DataValueField="Nom" DataTextField="Nom" OnSelectedIndexChanged="ListBox1_SelectedIndexChanged"></asp:ListBox>
           </form>
</body>
</html>

A voir également

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.