CIAO!
Io mi connetto a un database in questo modo:
Nel form ho inserito una listbox e vorrei ke si popolasse di tutti i dati di UN CAMPO del database (es tutti i nomi)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
Come devo fare?
Ho provato con:
Ma è evindete ke sbaglio visto ke mi da errore!!codice:List1.DataSource = ADORS List1.DataField = "nome"
Ho provato anke con:
Ma si blocca tutto durante il test... :master:codice:Do While Not ADORS.EOF List1.AddItem ADORS("nome") Loop
Per disperazione ho messo:
Ma mi mette solo il 1° nome del database!!codice:List1.AddItem rs("campo")
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!

Rispondi quotando