Fórum Como inserir registros usando query??? #195090

14/11/2003

0

Delphi

Olá...

Primeiramente obrigado por ler a minha pergunta, espero que possa me ajudar...

Desenvolvi um sistema usando banco de dados access, mas ele ficou muito lento, agora estou tentando usar ADOQuery, só que nunca usei, estou tentando usar o seguinte código, mas está danto o seguinte erro: ´Tipo de dados incompatível na expressão de critério´. O que pode estar errado??? existe uma forma mais fácil de se fazer isso???

       SQL.Clear;
       Sql.Add(´select * from usuarios where Nome = 654564´);
       Open;
       SQL.Clear;
       Sql.Add(´INSERT INTO Senha(Login, Nome, TipoAcesso, Senha) VALUES( :Login, :Nome, :TipoAcesso, :Senha )´);
       open;
       Parameters.ParamByName(´Login´).Value := Edit1.Text;
       Parameters.ParamByName(´Nome´).Value := Edit2.Text;
       Parameters.ParamByName(´TipoAcesso´).Value := ComboBox1.Text;
       Parameters.ParamByName(´Senha´).Value := Edit3.Text;
       execSql;
       post;
       SetFocus;


desde já muito obrigado....


Balceiro

Balceiro

Responder

Posts

15/11/2003

Fabio.hc

Tente assim:
-Removendo o comando open antes do Parameters. 
       SQL.Clear; 
       Sql.Add(´INSERT INTO Senha(Login, Nome, TipoAcesso, Senha) VALUES( :Login, :Nome, :TipoAcesso, :Senha )´); 
       Parameters.ParamByName(´Login´).Value := Edit1.Text; 
       Parameters.ParamByName(´Nome´).Value := Edit2.Text; 
       Parameters.ParamByName(´TipoAcesso´).Value := ComboBox1.Text; 
       Parameters.ParamByName(´Senha´).Value := Edit3.Text; 
       execSql;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar