Popolare listbox Vb.Net

[Connor]

ciao a tutti
come faccio a popolare una listbox in vb.net??
con un dataset?
Ho provato cosi ma nn mi funziona:

lstIp.ValueMember = "CAMPOA"
lstIp.DisplayMember = "CAMPOB"
lstIp.DataSource=MyDst


Grazie delle risposte

[silvia11/12/80]

Prova cosi:

Connessione.Open()
        sql = "SELECT * FROM ....."
        Dim cmd As New SqlDataAdapter(sql, Connessione)
        Dim data As New DataSet()
        cmd.Fill(data)
        Dim i
        For i = 0 To data.Tables(0).Rows.Count - 1
            NomeLista.Items.Add((data.Tables(0).Rows(i)(1)))
            NomeLista.ValueMember = data.Tables(0).Rows(i)(0)
        Next
        Connessione.Close()

[Connor]

no cosi nn posso farlo.....il dataset me lo riprendo da un web services costruito in precedenza....
poi mmi richiamo l'oggetto e mi riprendo il dataset in questo modo:

Dim obj As New WebService.ServerMessage()
lstIp.datasource= obj.CaricaDataSet()


però nn mi va..

qualche altra idea?

grazie della risposta.

[DaFella]

anche io sto facendo una cosa simile. Devi popolare un datagrid, ho un componente sul server che mi contiente la connessione al DB e un adattatore di dati.
Sul client ho un dataset vuoto e quando carico la pagina mi chiama una funzione contenuta nel componente alla quale passo questo dataset sul quale verrà fatta la fill del adattatore di dati collegato alla tabella dalla quale voglio caricare i dati.
Nella pagina aspx del client :

Protected myComponent As New Componente()

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Inserire qui il codice utente necessario per inizializzare la pagina
If Not IsPostBack Then
myComponent.FillDataSet(DataSetElementi1) DataGrid1.DataBind()
End If
End Sub

Mentre nel Componente.vb sul server :

Public Sub FillDataSet(ByVal dSet As DataSetElementi)
SqlDataAdapter1.Fill(dSet)
End Sub

più o meno dovrebbe funzionare così anche per i datalist,
il mio probelma è che quando faccio partire il debug mi dà l'errore sulla funzione filldataset perchè mi dice che l'utente (???) aspnet NON HA ACCESSO AL SERVER....tu ne sai qualcosa ???

[DaFella]

.... e dimenticavo devi impostare la proprietà datasuorce direttamente del menù sul dataset che inserisci nella pagina web...

:bubu:

[Connor]

si io il dataset ce l'ho già....lo prendo in questo modo con il web services.:



<WebMethod(Description:="Riprendi i dati")> Public Function CaricaDataset() As DataSet

Dim StrSql As String
Dim Cn As OleDbConnection
Dim DaD As OleDbDataAdapter
Dim Dst As DataSet
Dim percorso As String

percorso = "percorsoDB"


StrSql = "SELECT * From Utenti"


Cn = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0; Data Source=" & percorso)
DaD = New OleDbDataAdapter(StrSql, Cn)
Dst = New DataSet()
DaD.Fill(Dst, "CAMPOA")

Return Dst

End Function


e poi il dataset lo volevo mettere in una listbox...

Dim obj As New WebService.ServerMessage()
lstIp.datasource= obj.CaricaDataSet()

ma nn va...

chiaro?

[DaFella]

Ma che errore ti dà ????

[Connor]

nella listbox1 mi scrive:

System.Data.DataViewManagementListItemTypeDescript ion

e nn mi fa vedere i record

[DaFella]

uhm...non so però mi puzza un po' questo :

DaD.Fill(Dst, "CAMPOA")

come secondo paramentro non dovresti metterci la Sourcetable + che il campo della tabella che vuoi visualizzare ??
quello lo dovresti impostare dopo su la tua list...

credo....

[Connor]

cioè..??
fammi un esempio.....


cmq se popolo un datagrid mi funziona in quel modo......