DATAGRID...help!!!!!!!!

[saradid]

Ciao a tutti,
sto facendo un programma che va a leggere i dati da una tabella access


ecco il programma
all'inizio setto la connessione sul mio db access in locale....
quello che vorrei fare e' avere una griglia in visual basic ....un grid che mi fa vedere la tabella access cosi' come la vedrei da access!!!!!!!
come faccio ad andare avanti????

Private Sub Form_Load()
Dim StrSQL As String
Dim Conn As ADODB.Connection
Set Conn = New ADODB.Connection
Dim rs As ADODB.Recordset
Set rs = CreateObject("ADODB.Recordset")

'APERTURA CONNESSIONE verso ACCESS
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=c:\dino\imprese.mdb"

'Costruisco la stringa SQL
StrSQL = "SELECT * from imprese"
'Apro il recordset
rs.CursorLocation = adUseClient
rs.Open StrSQL, Conn, adOpenForwardOnly, adLockReadOnly, adCmdText

numero = rs.Fields(0) 'Mi restituisce il totale record nel recordset

'Chiudo RS
rs.Close
Set rs = Nothing
'Chiudi Connessione
Conn.Close
Set Conn = Nothing

End Sub


Grazie mille a tutti!
sara

[Mychy]

Prova così:

....
rs.Open StrSQL, Conn, adOpenForwardOnly, adLockReadOnly, adCmdText
do while not rs.eof
numero = rs!nomecampo ' numero acquista il valore di rs!nomecampo
insetrisci nel datagrid
rs.movenext
loop
....

[anatroccolo]

Potresti settare il "data source" del DataGrid con il recordset e si popola da solo con tutti i dati estratti dalla stringa SQL:

Set DataGrid.DataSource = Rs


Ciao