Insert via ADODataSet
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;
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
Curtidas 0
Respostas
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.....
//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
19/08/2003
Mas no objeto ADODataSet na tem a pripiedade ExecSql
GOSTEI 0