DataGrid

[DRKAngel]

ciao sono un po' novello 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, 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=********;database=**** ****"
' 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

vi prego aiutatemi, grazie

[b.lory]

' 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

Nelle proprietà della grid - colonne - hai impostato la proprietà DataField con il nome del campo, (IDAnagrafica),(NomeCliente),
ciao

[DRKAngel]

non funzia, ho pure provato a impostare a true la proprieta' visible delle colonne

[b.lory]

:master: :master: ....molto strano... hai già provato ad modificare la proprietà adOpenStatic in adOpenKeyset..

sql_mshcon = "Select * from dati order by desc" 
rs_mshcon.Open sql_mshcon, cn, adOpenKeyset, adLockOptimistic, adCmdText
Set msh_condominio.DataSource = rs_mshcon

questo esempio è uno di quelli che uso e non ha problemi !!!
ciao

[DRKAngel]

ti ringrazio moltissimo ora provo...