procedure
var
flist : string;
begin
for k:=0 to filelistbox1.Items.Count -1 do
begin
flist := filelistbox1.Items[k];
query2.close;
query2.sql.clear;
query2.sql.Add('insert into data_table');
query2.sql.Add('values(:a_id, :a_name)');
query2.parambyname('a_id').AsInteger := g_gid; //g_gid는 integer
query2.ParamByName('a_name').AsString := flist;
query2.ExecSQL;
end;
end;
이렇게 insert를 했는데 값이 들어가질 않아요
자꾸 에러가 나서리... 조언부탁합니다.
> procedure
> var
> flist : string;
> begin
> for k:=0 to filelistbox1.Items.Count -1 do
> begin
>
> flist := filelistbox1.Items[k];
> query2.close;
> query2.sql.clear;
> query2.sql.Add('insert into data_table');
> query2.sql.Add('values(:a_id, :a_name)');
> query2.parambyname('a_id').AsInteger := g_gid; //g_gid는 integer
> query2.ParamByName('a_name').AsString := flist;
> query2.ExecSQL;
> end;
> end;
>
> 이렇게 insert를 했는데 값이 들어가질 않아요
> 자꾸 에러가 나서리... 조언부탁합니다.
>
저두 초보라 잘 모르는데요.. 그냥 참고 하시죠..
> flist := filelistbox1.Items[k];// 이부분에서 string 값이 들어가는지요??
저는 이렇게 했거든요
flist := FileListBox1.Items.String[k];
그리고 깔끔하게 with 문 사용하시고요.. 이러다 틀리면 쪽인데..
with Query1 do
참 그리고 insert 할때(테이블 필드명을 써주는 것이 나중을 위해서 좋다고 하더군요.
지금은 두개지