Fórum ado/access/delphi - erro execução de query #231387
11/05/2004
0
DM.qry_insertfunc.Close;
DM.qry_insertfunc.SQL.Clear;
DM.qry_insertfunc.SQL.Add(´insert into Tab_Funcionarios (nome,usuario,senha,´);
DM.qry_insertfunc.SQL.Add(´acesso,cpf,endereco,bairro,cep) values´);
DM.qry_insertfunc.SQL.Add(´(:nome,:usuario,:senha,:acesso,:cpf,´);
DM.qry_insertfunc.SQL.Add(´:endereco,:bairro,:cep)´);
DM.qry_insertfunc.Parameters.ParamByName(´nome´).Value:=edt_nome.Text;
DM.qry_insertfunc.Parameters.ParamByName(´usuario´).Value:=edt_usuario.Text;
DM.qry_insertfunc.Parameters.ParamByName(´senha´).Value:=edt_senha.Text;
DM.qry_insertfunc.Parameters.ParamByName(´acesso´).Value:=cmb_acesso.Text;
DM.qry_insertfunc.Parameters.ParamByName(´cpf´).Value:=edt_cpf.Text;
DM.qry_insertfunc.Parameters.ParamByName(´endereco´).Value:=edt_endereco.Text;
DM.qry_insertfunc.Parameters.ParamByName(´bairro´).Value:=edt_bairro.Text;
DM.qry_insertfunc.Parameters.ParamByName(´cep´).Value:=edt_cep.Text;
if not DM.qry_insertfunc.Prepared then
DM.qry_insertfunc.Prepared:=true;
Try
DM.qry_insertfunc.Open;
showmessage(´Inclusão bem sucedida!´)
except
showmessage(´Ocorreu um erro!´)
end;
estou usando ADOQuery, mas esta gerando erro:
raise exception class EOleException with message ´A operação deve usar uma consulta atualizável´.
alguém pode me dizer o que está acontecendo errado? não posso usar um adoquery para fazer update, delete ou insert?
Marceloro
Curtir tópico
+ 0Posts
11/05/2004
Comodelphi
Gostei + 0
11/05/2004
Tathianam
o
.Execute
Gostei + 0
12/09/2016
Marcos
DM.qry_insertfunc.Open;
E sim o:
DM.qry_insertfunc.ExecSql;
Gostei + 0
15/09/2016
Huidemar Costa
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)