[Vb Net] Inserire dati-combo

[Asso79]

Devo inserire i dati in una combobox partendo da un database mysql ma non so come inserire un dato alla volta con la connessione seguente_

Code:
Dim sConn As String = "Driver=MySQL ODBC 3.51 Driver; Database=db;dsn=dsn;uid=;password=;"
Dim SQL As String = "SELECT codice FROM clienti"
Dim objConn As New OdbcConnection(sConn)
Dim objCommand As New OdbcCommand(SQL, objConn)
Dim objdataadapter As New OdbcDataAdapter(SQL, objConn)

objConn.Open()
end code

'Per inserire so che devo fare combo.addItem()
ma come faccio.

Grazie a chi mi può aiutare

[ladyBlu]

prova a vedere qui:
http://forum.html.it/forum/showthrea...hreadid=458786

[Asso79]

Per caricare i dati non ho problemi , il problema principale è estrarli uno alla volta dal dbase mysql.

[erme2]

non sarà elegante ma fatta la query puoi appoggiare i dati su una datagrid nascosta e poi caricarli sulla combo

[silvia11/12/80]

io la combo l'ho caricata cosi

 Sub CaricaCombo()
        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
            CBB_Tipologia.Items.Add((data.Tables(0).Rows(i)(1)))
            CBB_Tipologia.ValueMember = data.Tables(0).Rows(i)(0)
        Next
        Connessione.Close()
    End Sub

prova a vedere se ti funziona

[Asso79]

Non mi riconosce cmd, ma se è il nome che gli dò io.....

[silvia11/12/80]

prova a cambiarli nome

[Asso79]

Avevo sbagliato la seconda parte del paramtro in sqldataadapter ma ora si ferma ancora in quel punto.

code
Dim sConn As String = "Driver=MySQL ODBC 3.51 Driver; Database=db;dsn=dsn;uid=;password=;"
Dim SQL As String
Dim objConn As New OdbcConnection(sConn)
Try
' apro la connessione
objConn.Open()
Catch err As Microsoft.Data.Odbc.OdbcException
MessageBox.Show(err.Message)
End Try

SQL = "SELECT * FROM clienti_fornitori"
Dim cmd As New SqlDataAdapter(SQL, sConn)

L'errore che mi dà è:
An unhandled exception of type 'System.ArgumentException' occurred in system.data.dll

Additional information: Unknown connection option in connection string: driver.

[silvia11/12/80]

prova, ma è solo per maggiore chiarezza mettere al posto di:
Dim cmd As New SqlDataAdapter(SQL, sConn)
cambialo con
Dim cmd As New SqlDataAdapter(SQL, objConn )
non sò se è per questo fammi sapere

[Asso79]

Deve essere una stringa il parametro da inserire in SqlDataAdapter non una odbcconnection.
Per connettersi hai usato una stringa come la mia?