[VB 2008] - Aggiungere voci a combo

[mdnet]

Salve, qualcuno mi potrebbe gentilmente segnalare un esempio dove poter imparare ad inserire delle voci in un ComboBox prelevandole da una tabella di un DB Access ?


Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.jet.oledb.4.0; data source=c:\test\database.mdb")
Dim cmd As OleDbCommand = New OleDbCommand("Select Campo1 FROM Tabella1 where stato=1", con)
Dim dr As OleDbDataReader
con.Open()
dr = cmd.ExecuteReader
While dr.Read()
Combo1.Items.Add = dr("Campo1").ToString()
End While
dr.Close()

Dove sbaglio ?

Grazie infinite a chiunque abbia tempo e voglia di aiutarmi.

[oregon]

Ma il problema che hai qual è?

[mdnet]

Buongiorno Oregon, mi segnala un errore in questa parte di codice

Combo1.Items.Add = dr("Campo1").ToString()


Argomento non specificato per il parametro 'item' di 'Public Function Add(item As Object) As Integer'

Purtroppo non è tantissima pratica e da ieri sera sto impazzendo tra prove e riprove ma nulla.

Grazie

[oregon]

Combo1.Items.Add ( dr("Campo1").ToString() )

[mdnet]

Combo1.Items.Add ( dr("Campo1").ToString() )

Ho aggiustato il codice e mi restituisce questo errore:

Tipi di dati non corrispondenti nell'espressione criterio.

in questa riga: dr = cmd.ExecuteReader

Grazie infinite per l'aiuto

[jekisi]

Sarebbe meglio spiegarlo a video, se mi dai il tuo indirizzo e-mail?

Distinti Saluti

Fabio Messina

[oregon]

Sarebbe meglio spiegarlo a video, se mi dai il tuo indirizzo e-mail?

Perché mai dovrebbe darti il suo indirizzo email? Si risponde qui nel forum, non in privato ...

Tipi di dati non corrispondenti nell'espressione criterio.

Probabilmente il campo stato non è di tipo numerico. Se fosse un testo avresti dovuto scrivere

"Select Campo1 FROM Tabella1 where stato='1' "

Dicci di che tipo è il campo stato ...

[mdnet]

Grazie l'errore stava nella tabella del DB, avevo impostato il campo come testo e non numerico.Avanzate da bere 😄 GRAZIE

[mdnet]

Sprero di non sbagliare a continuare qui, se così fosse prego admin di eliminare pure.

Avete qualche consiglio per proteggere il mio programma, tipo numero di licenza o altri metodi ?
Grazie infinite.

[oregon]

In effetti qui la discussione era un'altra ... credo proprio sia necessario un altro thread con titolo pertinente ...