CIAO!
Io mi connetto a un database in questo modo:
codice:
Dim ADOCN As New ADODB.Connection
Dim ADORS As New ADODB.Recordset
Private Sub Form_Load()
ADOCN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database.mdb"
ADOCN.Open
ADORS.Open "SELECT * FROM Anagrafica", ADOCN
End Sub
Nel form ho inserito una listbox e vorrei ke si popolasse di tutti i dati di UN CAMPO del database (es tutti i nomi)
Come devo fare?
Ho provato con:
codice:
List1.DataSource = ADORS
List1.DataField = "nome"
Ma è evindete ke sbaglio visto ke mi da errore!!
Ho provato anke con:
codice:
Do While Not ADORS.EOF
List1.AddItem ADORS("nome")
Loop
Ma si blocca tutto durante il test... :master:
Per disperazione ho messo:
codice:
List1.AddItem rs("campo")
Ma mi mette solo il 1° nome del database!!
CHE POSSO FARE?
A una curiosità...com'è che col codice che ho messo a volte si connette e invece a volta mi da il percorso di vb (C:\Programmi\Microsoft Visual Studio\VB98) con conseguente errore ke nn trova il db (ke è nella cartella del programma) e per far il debug mi tocca metter tutto il percorso assoluto sino alla cartella in cui sta il DB?!?
Grazie infinite!
CIAO!