[VB6] Errore "Impossibile assegnare segnalibri ad un gruppo di righe"

[Games]

Ho una datagrid e devo collegare il datafield con i campi della query

Dim cn As ADODB.Connection
 Dim rs As ADODB.Recordset
 Dim count As String
 Set cn = New ADODB.Connection
 Set rs = New ADODB.Recordset
 cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Database\conto_corrente.mdb;Persist Security Info=False"
 rs.Open "SELECT * FROM banche, conto_corrente WHERE id_utente = " & id_utente & "  AND conto_corrente.id_banca = banche.id_banca", cn, 1
 txt_nome.Text = rs("nome").value
 txt_cogn.Text = rs("cognome").value
 txt_num.Text = rs("id_conto").value
 txt_banca.Text = rs("denominazione").value
 lbl_salatt.Caption = rs("saldo").value
 sql = "SELECT * FROM azioni WHERE id_conto = " & txt_num.Text & ""
 Set rs = cn.Execute(sql)
 Set grid_spese.DataSource = rs
 grid_spese.Columns(0).DataField = rs("descrizione")
 grid_spese.Columns(0).Caption = "Descrizione"
 grid_spese.Columns(0).Width = 5350
 grid_spese.Columns(1).DataField = rs("tipo")
 grid_spese.Columns(1).Caption = "Tipo"
 grid_spese.Columns(1).Width = 1400
 grid_spese.Columns(2).DataField = rs("data")
 grid_spese.Columns(2).Caption = "Data"
 grid_spese.Columns(2).Width = 1400
 grid_spese.Columns(3).DataField = rs("Importo")
 grid_spese.Columns(3).Caption = "Importo"
 grid_spese.Columns(3).Width = 1400

Quando fa la Set grid_spese.DataSource = rs mi dice che è impossibile assegnare segnalibri al gruppo di righe :berto: :berto:

Grazie a tutti

[oregon]

Prima della cn.Open prova ad inserire

cn.CursorLocation = adUseClient

[Games]

Ok quell'errore non me lo da più, però nella tabella non vedo niente nonostante abbia estratto un record.
Ti chiedo anche se gentilmente potresti spiegarmi quell'istruzione

[oregon]

La CursorLocation indica se il recordset deve essere lato server o client.

Non riesco a replicare il tuo problema ... sei sicuro che ci sia il record da visualizzare?

[Games]

Si
Non ho mai usato una datagrid.
Il record che ho in rs ( potrei avere anche più record ) devono venire visualizzati della griglia negli appositi campi. Ho dimenticato qualcosa??

[oregon]

Ti ripeto ... a me funziona ...

Se puoi e se vuoi, fammi scaricare il progetto e il file .mdb e ci do' un'occhiata ...

[Games]

Cioè con il mio codice popola la griglia?

[oregon]

Sì, con la modifica che ti ho indicato e con un mio database.

[Games]

Mi fai vedere come hai scritto il codice? se proprio non riesco ti invio un file rar
Grazie ancora

[Games]

Sto un po impazzendo.
In debug ho visto che il datafield assume il valore del mio campo, invece deve assumere il nome del campo da stampare.
Ho messo nel mio spaces il file rar.
Ecco l'indirizzo:

LINK