[VB6] ADODB.Command e differenti database

[quincy]

Salve a tutti,
volevo proporre un dubbio che mi pervade al quale non ho trovato ancora una risposta. Nella libreria ADO per riempirmi un recordset con dei dato estratti da un database Mysql uso il metodo ADODB.command, in maniera tale che ottengo anche il numero di record estatti con la query.
EX:

Dim cmdSQLData As ADODB.Command
dim numRecord as long
    Set cmdSQLData = New ADODB.Command
    Set cmdSQLData.ActiveConnection = CnDb
    cmdSQLData.CommandText = SQL
    cmdSQLData.CommandType = adCmdText
    Set rs = cmdSQLData.Execute(numRecord)

Fino a qui tutto bene.
Ora stò lavorando con il server SQL Microsoft e con lo stesso codice ottengo che il numero di record estatti è -1! Il recordset viene riempito con i dati, ma il commanset mi dà che i record affetti sono appunto -1!

Siccome ero curioso di capire la motivazione di tale comportamento( forse dipende dal diverso driver usato per MySQL, se qualcuno di voi ha qualche idea in proposito lo ringrazio anticipatamente.


Grazie e ciao!

[Brainjar]

Il comportamento dipende dal tipo di cursore.
Prova ad impostare :

rs.CursorLocation = adUseClient
Set rs = cmdSQLData.Execute(numRecord)

[quincy]

Per prima cosa grazie per la risposta!

Purtroppo la csa non cambia mettendo quel tipodi cursore.

Altra Idea?

Grazie mille!

[oregon]

La frase SQL usata qual e'?

[quincy]

SQL:

select * from wrmonitoringdata where date_recd_dtm > '2005-11-15 00:00:00'

Quindi molto semplice!

[oregon]

Subito dopo l'istruzione

Set rs = cmdSQLData.Execute(numRecord)

inserisci la linea

MsgBox rs.CursorLocation & " " & CnDb.CursorLocation

e leggi il risultato

[quincy]

Il risultato è

3 3 !

Ciao e grazie per l'aiuto!

[oregon]

Prova a inserire la linea

CnDb.CursorLocation = adUseServer

prima della Open della Connection (ovvero prima della CnDb.Open ...)

[quincy]

Mettendo il cursore lato server dal punto di vista del conteggio numero di records non cambia nulla(sempre -1 ottengo) mentre ora il recordset non mi viene caricato con i dati: infatti ottengo che

numRecord = rs.RecordCount

dove numRecord = -1 mentre almeno prima mi dava il numero di record dentro il recordset!

Ciao

[oregon]

Aspetta un attimo ... ma prima ottenevi in rs.RecordCount il numero dei record letti ? E quindi il problema qual era?