Insert Into com ADOQuery
Estou com um problema, como faço para inserir dados em campos de uma tabela do Access usando ADOQuery e ADOConnection.
Por não estou conseguindo conectar na tabela
Na Propriedade: ConnectionString do ADOConnection eu colquei o seguinte :
ConnectionString=Microsoft.Jet.OLEDB.4.0
E no ADOQuery.Strings=Insert into Tabela Values (:Codigo, :Texto)
e qundo vou ativar o ADOQuery da a seguinte menssagem:
´ADOQuery: Command Text does not return a result set.´
alguém sabe o por que dessa menssagem?
Por não estou conseguindo conectar na tabela
Na Propriedade: ConnectionString do ADOConnection eu colquei o seguinte :
ConnectionString=Microsoft.Jet.OLEDB.4.0
E no ADOQuery.Strings=Insert into Tabela Values (:Codigo, :Texto)
e qundo vou ativar o ADOQuery da a seguinte menssagem:
´ADOQuery: Command Text does not return a result set.´
alguém sabe o por que dessa menssagem?
Luisandro
Curtidas 0
Respostas
Vinicius2k
27/10/2004
Colega,
Bem, sua string de conexão está incompleta, mas ao que me parece foi um erro de digitação.
Seu problema está com a ativação. Queries com instruções INSERT, UPDATE, DELETE ou DDL não podem ser ´Ativadas´ ou abertas.
Em tempo de execução vc deve passar os valores dos parametros e chamar o método [b:420c61bad2]ExecSQL[/b:420c61bad2]. E esta query não deverá ser ligada a nenhum controle tipo DBGrid pq ela não retorna registros...
Espero ter ajudado...
T+
Bem, sua string de conexão está incompleta, mas ao que me parece foi um erro de digitação.
Seu problema está com a ativação. Queries com instruções INSERT, UPDATE, DELETE ou DDL não podem ser ´Ativadas´ ou abertas.
Em tempo de execução vc deve passar os valores dos parametros e chamar o método [b:420c61bad2]ExecSQL[/b:420c61bad2]. E esta query não deverá ser ligada a nenhum controle tipo DBGrid pq ela não retorna registros...
Espero ter ajudado...
T+
GOSTEI 0
Luisandro
27/10/2004
Eu escrevi o seguinte código:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(´insert into Tabela values(:Codigo, :Texto)´);
ADOQuery1.Parameters.ParamByName(´codart´).Value := IntToStr(iii);
ADOQuery1.Parameters.ParamByName(´Texto´).Value :=Texto;
ADOQuery1.ExecSQL;
Agora sim funcionou, era como tu disse mesmo, Valeu pela ajuda Vinicius!!!
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(´insert into Tabela values(:Codigo, :Texto)´);
ADOQuery1.Parameters.ParamByName(´codart´).Value := IntToStr(iii);
ADOQuery1.Parameters.ParamByName(´Texto´).Value :=Texto;
ADOQuery1.ExecSQL;
Agora sim funcionou, era como tu disse mesmo, Valeu pela ajuda Vinicius!!!
GOSTEI 0