RUN TIME ERROR 2147467259 80004005
Obtenho esse Erro Pessoal , o Registro grava Corretamente , mais da esse erro
THE COMMIT TRANSACTION REQUEST HAS NO CORRESPONDING BEGIN TRANSACTION
database
codigo - interger identity
empresa - integer
descricao - varchar
esse é o código
Dim Rst As adodb.Recordset
Conectar
Dim strSQL As String
varEmpr = txtempresa.Text
varTipo = txtdescricao.Text
strSQL = [Ô]EXECUTE SP_TIPOS_INCLUSAO [ô][Ô] & varEmpr & [Ô][ô] , [ô][Ô] & varTipo & [Ô][ô][Ô]
Set Rst = conexao.Execute(strSQL)
conexao.Close
Set Rst = Nothing
Set conexao = Nothing
THE COMMIT TRANSACTION REQUEST HAS NO CORRESPONDING BEGIN TRANSACTION
database
codigo - interger identity
empresa - integer
descricao - varchar
esse é o código
Dim Rst As adodb.Recordset
Conectar
Dim strSQL As String
varEmpr = txtempresa.Text
varTipo = txtdescricao.Text
strSQL = [Ô]EXECUTE SP_TIPOS_INCLUSAO [ô][Ô] & varEmpr & [Ô][ô] , [ô][Ô] & varTipo & [Ô][ô][Ô]
Set Rst = conexao.Execute(strSQL)
conexao.Close
Set Rst = Nothing
Set conexao = Nothing
Tente colocar conexao.BeginTrans antes de Set Rst = conexao.Execute(strSQL) e depois conexao.CommitTrans
Tópico encerrado , respostas não são mais permitidas