Fórum ExecuteDirect -gt; Não estou entendendo!! #337096
01/02/2007
0
Pessoal estou usando o metodo ExecuteDirect do SqlConnection para executar SQL, de acordo com o Help do Delphi:
´ExecuteDirect retorna 0 se o comando for executado com sucesso. Se não, retorna um código de erro dos dbExpress.´
Estou executando o seguinte codigo:
O comando é executado no banco sem problema mas como retorno da função estou tendo o valor: 1
Eu é que estou ficando doido ou o que? Alguem sabe onde esta meu erro?
Valew
´ExecuteDirect retorna 0 se o comando for executado com sucesso. Se não, retorna um código de erro dos dbExpress.´
Estou executando o seguinte codigo:
function TClassePrincipal.ExecutaSql(pComando: OleVariant): OleVariant;
var
Sql : string;
Auxiliar : Real;
begin
Sql := pComando;
try
Auxiliar := FrmPrincipal.SQLConnection.ExecuteDirect( Sql );
Result := Auxiliar;
except
on e : Exception do FrmPrincipal.MensagemErroLog(e.Message);
end;
end;
O comando é executado no banco sem problema mas como retorno da função estou tendo o valor: 1
Eu é que estou ficando doido ou o que? Alguem sabe onde esta meu erro?
Valew
Mmoreira
Curtir tópico
+ 0
Responder
Posts
02/02/2007
Mmoreira
Ninguem?
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)