이성훈 wrote:

> 잘안네요

> Query3.Close;

> Query3.SQL.Clear;

> Query3.SQL.ADD( ' INSERT INTO CDMGM ');

> Query3.SQL.ADD( ' (no,title,sn,reg_date,reg_name,backup,remark,cd_code) ');

> Query3.SQL.ADD( ' VALUES ');

> Query3.SQL.ADD( ' ( :no ');

> Query3.SQL.ADD( ' :title ');

> Query3.SQL.ADD( ' :sn ');

> Query3.SQL.ADD( ' :reg_date ');

> Query3.SQL.ADD( ' :reg_name ');

> Query3.SQL.ADD( ' :backup ');

> Query3.SQL.ADD( ' :remark ');

> Query3.SQL.ADD( ' :cd_code ) ');

> Query3.Prepare;

> Query3.ParamByName('no').asString := e_no.Text;

> Query3.ParamByName('title').asString := e_title.Text;

> Query3.ParamByName('sn').asString := e_serial.Text;

> Query3.ParamByName('reg_date').asString := e_date.Text;

> Query3.ParamByName('reg_name').asString := e_name.Text;

> Query3.ParamByName('backup').asString := e_backup.Text;

> Query3.ParamByName('remark').asString := e_remark.Text;

> Query3.ParamByName('cd_code').asString := e_kind.Text;

>

> 컴파일은 되는데 insert가 안되네요

> 아시는 분이 있으시면 가르쳐 주세요...

>

=================================================================

Query3.SQL.ADD( ' ( :no ');

Query3.SQL.ADD( ' :title ');

Query3.SQL.ADD( ' :sn ');

Query3.SQL.ADD( ' :reg_date ');

Query3.SQL.ADD( ' :reg_name ');

Query3.SQL.ADD( ' :backup ');

Query3.SQL.ADD( ' :remark ');

Query3.SQL.ADD( ' :cd_code ) ');

어디를 보아도 컬럼값덜(물론 파라미터지만요)사이에 컴마(Comma ',')가

없네여..물론 이것은 컴파일시에 에러가 안납니다. 그러나 인서트는 아니되지요

컴마를 찍고 다시 해보세여...



즐코되시기를.....

이성훈 wrote:

> 잘안네요

> Query3.Close;

> Query3.SQL.Clear;

> Query3.SQL.ADD( ' INSERT INTO CDMGM ');

> Query3.SQL.ADD( ' (no,title,sn,reg_date,reg_name,backup,remark,cd_code) ');

> Query3.SQL.ADD( ' VALUES ');

> Query3.SQL.ADD( ' ( :no ');

> Query3.SQL.ADD( ' :title ');

> Query3.SQL.ADD( ' :sn ');

> Query3.SQL.ADD( ' :reg_date ');

> Query3.SQL.ADD( ' :reg_name ');

> Query3.SQL.ADD( ' :backup ');

> Query3.SQL.ADD( ' :remark ');

> Query3.SQL.ADD( ' :cd_code ) ');

> Query3.Prepare;

> Query3.ParamByName('no').asString := e_no.Text;

> Query3.ParamByName('title').asString := e_title.Text;

> Query3.ParamByName('sn').asString := e_serial.Text;

> Query3.ParamByName('reg_date').asString := e_date.Text;

> Query3.ParamByName('reg_name').asString := e_name.Text;

> Query3.ParamByName('backup').asString := e_backup.Text;

> Query3.ParamByName('remark').asString := e_remark.Text;

> Query3.ParamByName('cd_code').asString := e_kind.Text;

>

> 컴파일은 되는데 insert가 안되네요

> 아시는 분이 있으시면 가르쳐 주세요...

>

>

소스를 다 안올리셔서 확실하지는 않지만

위문장 끝에 query3.execsql;

을 넣어줘야 만들어진 sql문이 실행이 되거든요

아니면 query3.execsql을 넣어 주었는데도 insert가 안되는거라면

try

query3.execsql;

except

on E:EdatabaseError do

begin

showmessage(E.message);

//에러처리

end

end; //try end

로 해서 에러 이유가 뭔지를 알아야 될것 같네요