VB6 SQL2008

SL4V3R 16/06/2010 17:30:42
#345035
Ola pessoal,

Aqui na empresa estamos migrando a versao do nosso SQL Server 2000 para a versao 2008.
Utilizamos VB6 e estou com erro que não consigo resolver.

Quando utilizo BEGIN TRANS para executar uma Stored Procedure, e command.ActiveConnection aparece o erro abaixo.

Err.number = -2147467259
Err.Description = A transação não pode ter vários conjuntos de registros com este tipo de cursor. Altere o tipo de cursor, confirme a transação ou feche um dos conjuntos de registros.

O interessante é que no SQL2000 funciona normalmente.

Segue o código:

Dim comando As New ADODB.Command
Dim RstRetorno As New ADODB.Recordset

adoConn.BeginTrans

Set comando.ActiveConnection = adoConn
comando.CommandText = [Ô]MINHAPROC[Ô]
comando.CommandType = adCmdStoredProc

comando([Ô]@P_1[Ô]) = 1
comando([Ô]@P_2[Ô]) = 2

Set RstRetorno = comando.Execute

If RstRetorno.Fields(0).Value <> [Ô]Ok[Ô] Then
MsgBox [Ô]ERRO! [Ô] & RstRetorno.Fields(1).Value
RstRetorno.Close
adoConn.RollbackTrans
Exit Sub
End If

RstRetorno.Close


Alguem já passou por isso?
Tópico encerrado , respostas não são mais permitidas