Controllo ADO Data

[gecoss]

Salve ho un grosso problema con ADODB.Recordset infatti se uso quest'oggetto il codice che mi hai postato funziona
perfettamente.

Ma il passo successivo del mio progetto prevede di collegarvi un
DataGrid.
Purtroppo il controllo DataGrid sembra che puo' essere collegato solamente aun controllo Adodc.
Infatti se tento di assegnarlo al mio ADODB.Recordset mi esce l'assurdo
errore 7004:
'Impossibile assegnare segnalibri al gruppo di righe'

ecco il codice:

Private Sub Command2_Click()
'conn = connessione
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

rs.CursorType = adOpenDynamic
rs.LockType = adLockOptimistic
rs.Open "Atleti", strCnn, , , adCmdTableDirect

' MsgBox rs.Supports(adSeek) 'True

Set myDG.DataSource = rs 'l'errore nasce qui

End Sub

[gecoss]

Comunque ho risolto!!!!

Il problema erano i puntatori:quote: :quote:

[Janx]

Prova così:

PRIMA di impostare il RecordSource alla DataGrid
imposta la proprietà:

rs.CursorLocation = adUseClient

e poi fai

Set myDG.DataSource = rs

[gecoss]

Ho provato in questo modo:

rsOrders.Open "SELECT * FROM miatabella ", _
cnNWind, adOpenStatic, adLockOptimistic, adCmdText

Così funziona.

Comunque ora il problema è linkare un record, come posso fare??

Grazie