용이 wrote:

> 머가 잘못된건지 좀 봐주세요. 부탁드립니다.

> 그냥 값을 받아서 입력하는건데...안돼네요. 워낙에 초보라서...ㅡㅡa

> DB는 mdb를 사용하구요. ADOConnection을 이용해서 연결했습니다.

> 컴파일은 돼는데...저장하려고 하면 자꾸 에러가 나네요.

> 구문에러라구...아시는 분들은 리블 부탁드립니다. 감사합니다.

>

>

> procedure TForm5.btnSaveClick(Sender: TObject);

> begin

> with ADOQuery1 do begin

> Close;

> SQL.Clear;

> SQL.Add('insert into Churchyard_Info');

> SQL.Add('(Dangi_No,Mu_No,ShinMu_No,YardNote,Pyong)');

> SQL.Add('values');

> SQL.Add(':Dangi_No,:Mu_No,:ShinMu_No,:YardNote,:Pyong');

> Parameters.ParamByName('Dangi_No').Value := Trim(EdtDangi_No.Text);

> Parameters.ParamByName('Mu_No').Value := edtMu_No.Text;

> Parameters.ParamByName('ShinMu_No').Value := edtShinMu_No.Text;

> Parameters.ParamByName('Pyong').Value := edtPyong.Text;

> Parameters.ParamByName('YardNote').Assign(meYardNote.lines);

> ExecSQL;

> end;

> end;



안녕하세요 저두 초보인데여 혹시 틀려도 이해해 주세요... ^^

1 with ADOQuery1 do begin

2 Close;

3 SQL.Clear;

4 SQL.Add('insert into Churchyard_Info ');

5 SQL.Add('(Dangi_No,Mu_No,ShinMu_No,YardNote,Pyong) ');

6 SQL.Add('values ');

7 SQL.Add('(:Dangi_No,:Mu_No,:ShinMu_No,:YardNote,:Pyong) ');



valuse뒤에두 () 이게 들어가야 할거 같은데요

그리구 sql문을 쓸때 앞이나 뒤에 항상 공백을 추가 하시는게 조을거 같네요

그이유는 한번 잘 생각해보시구.



ParamByName('Dangi_No').Value := Trim(EdtDangi_No.Text);

이거는 저같은 경우에는 이렇게 안쓰구

parambyname('Dangi_no').asstring := Trim(EdtDangi_no.Text);

이렇게 쓰거든요 어느게 맞는 건지는 몰겠구여 참고 하세요



Parameters.ParamByName('YardNote').Assign(meYardNote.lines);



이분장도 이상하군요.



그럼 즐코 하세요