Criação de Tabela Query em código (???)
Tento criar uma tabela Query para poder inserir dados numa tabela já existente (USUARIOS) em meu banco NBanco.gdb, mas sempre retorna o erro ´List of index bounds(0)´. Existe uma maneira de inserir dados numa tabela do Interbase diretamente? Segue o código abaixo:
var query1: TIBQuery;
begin
query1:=TIBQuery.create(dm);
query1.Database:=dm.IBDatabase;
query1.Name:=´QUSUARIOS´;
query1.ParamCheck:=true;
query1.SQL.Strings[0]:=´SELECT * FROM USUARIOS´;
query1.Active:=true;
query1.open;
query1.SQL.Strings[0]:=(´SELECT * FROM USUARIOS´);
query1.SQL.ADD(´INSERT INTO USUARIOS (NOME)´);
query1.SQL.ADD(´VALUES(´+´VVVVV´+´);´);
query1.close;
end;
var query1: TIBQuery;
begin
query1:=TIBQuery.create(dm);
query1.Database:=dm.IBDatabase;
query1.Name:=´QUSUARIOS´;
query1.ParamCheck:=true;
query1.SQL.Strings[0]:=´SELECT * FROM USUARIOS´;
query1.Active:=true;
query1.open;
query1.SQL.Strings[0]:=(´SELECT * FROM USUARIOS´);
query1.SQL.ADD(´INSERT INTO USUARIOS (NOME)´);
query1.SQL.ADD(´VALUES(´+´VVVVV´+´);´);
query1.close;
end;
Pablo_s
Curtidas 0
Respostas
Pgarcia
22/08/2003
Tem alguns erros no seu codigo mas não deu para entender o que vc quer fazer.... Vc quer inserir dados em uma tabela interbase mas esses dados serão lidos de onde?
[]´s
Paulo
[]´s
Paulo
GOSTEI 0
Biscoitorfa
22/08/2003
Depois que voce der um opem na query voce está adicionando o insert errado!!!
fica mais ou menos asism:
query.sql.clear;
query.sql.add(insert into usuarios (campos) values (´ ´´´+valor1+´´´ +´,´ + valor2.... + ´))
fica mais ou menos asism:
query.sql.clear;
query.sql.add(insert into usuarios (campos) values (´ ´´´+valor1+´´´ +´,´ + valor2.... + ´))
GOSTEI 0