Insert via ADODataSet

Delphi

19/08/2003

Olá Pessoal,

consigo executar uma consulta SQL utilizando um ADO DataSet, mas quando utilizo este mesmo componente para fazer um INSERÇÂO ele me retorna um erro dizendo que ´ O provedor atual não oferece suporte para retonar vários conjuntos de registros de um única execução ! ´.

Alguém saberia o que pode ser ?

Meu código está assim:

with dmCqual.dstInsertUsuario do
begin
close;
strSql:= ´INSERT INTO cqual_usuarios ´ +
´VALUES(´ + ´´´´ + edtLogin.Text + ´´´´ + ´,´ +
´´´´ + edtNome.Text + ´´´´ + ´,´ +
´´´´ + edtSetor.Text + ´´´´ + ´,´ +
´´´´ + edtRamal.Text + ´´´´ + ´)´ ;
commandText:= strSql;
Open;
end;


Marknet

Marknet

Curtidas 0

Respostas

Rômulo Barros

Rômulo Barros

19/08/2003

Simples:

//strSql:= ´INSERT INTO´ ...

Você está utilizando comandos para inserir em um banco de dados. Não utilize o comando [color=red:bf91e83d62]open[/color:bf91e83d62] , Utilize o comando [color=red:bf91e83d62]ExecSql[/color:bf91e83d62]

EX:

with dmCqual.dstInsertUsuario do
begin
close;
strSql:= ´INSERT INTO cqual_usuarios ´ +
´VALUES(´ + ´´´´ + edtLogin.Text + ´´´´ + ´,´ +
´´´´ + edtNome.Text + ´´´´ + ´,´ +
´´´´ + edtSetor.Text + ´´´´ + ´,´ +
´´´´ + edtRamal.Text + ´´´´ + ´)´ ;
commandText:= strSql;
[color=red:bf91e83d62]ExecSql;[/color:bf91e83d62]
end;

Pronto, assim seu código vai funcionar.....


GOSTEI 0
Marknet

Marknet

19/08/2003

Mas no objeto ADODataSet na tem a pripiedade ExecSql


GOSTEI 0
POSTAR