[Visual Basic 6]
Clicca QUI per vedere il messaggio nel forum |
| Berserk |
ciao sono un po' novello con vb6 ed ho alcuni problemi a caricare il risultato di una query in una datagrid...
mi spiego, se cerco di caricare i dati in una flexgrid nn ci sono problemi, ma la datagrid mi rimane inesorabilmente vuota..il mio codice e' questo, qualcuno sa dirmi dove sbaglio???
Dim db_conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim rs1 As ADODB.Recordset
' Apro una connesisone al DB
Set db_conn = New ADODB.Connection
db_conn.ConnectionString = "driver={SQL Server};server=********;uid=********;dat
abase=********"
' db_conn.ConnectionTimeout = 30
db_conn.Open
' Estraggo i dati dal DB
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "Select IDAnagrafica, NomeCliente FROM unianagr", db_conn, adOpenStatic, adLockReadOnly, adCmdText
' Metto i dati ottenuti dalla query nella flexgrid
Set MSHFlexGrid1.DataSource = rs
' Metto i dati ottenuti dalla query nella datagrid
Set rs1 = New ADODB.Recordset
rs1.CursorLocation = adUseClient
rs1.Open "Select IDAnagrafica, NomeCliente, Indirizzo FROM unianagr", db_conn, adOpenStatic, adLockOptimistic
Set DataGrid1.DataSource = rs1
grazie dello sbattimento |
|
|
|
