Q&A

  • update 구문오류가 뜹니다..
아래 프로시져는 오라클에서는 정상적으로 동작합니다.
근대 ado를 써서 access db로 실행하면  update 구문오류라고 나오네요..
고수님들 원인좀 찾아주세요.


procedure TfmMainAdm.btnUpdateOkClick(Sender: TObject);
var ss: string;
begin
    with dm.qrlUpdate do begin
      close;
      sql.clear;
      sql.add('update main set kukname = :p1, deptname = :p2         ');
      sql.Add(' ,floor = :p3, eqid = :p4, eqmodel = :p5              ');
      sql.add(' ,eqGubun = :p6, adminNo = :p7, adminsn = :p8         ');
      sql.add(' ,muser = :p9, return = :p10, inDate = :p11           ');
      sql.add(' ,memo = :p12, etc1 = :p13, etc2 = :p14, etc3 = :p15  ');
      sql.add('where id= :p16                   ');
      parameters.parambyname('p1').value:= cbKukname.Text;
      parameters.parambyname('p2').value:= cbDeptname.text;
      parameters.parambyname('p3').value:= cbFloor.text;
      parameters.parambyname('p4').value:= Uppercase(eEqid.text);
      parameters.parambyname('p5').value:= Uppercase(eEqmodel.text);
      parameters.parambyname('p6').value:= cbEqgubun.text;
      parameters.parambyname('p7').value:= Uppercase(eAdminNo.text);
      parameters.parambyname('p8').value:= Uppercase(eEqSn.text);
     parameters.parambyname('p9').value:= Uppercase(eUser.text);

...
      parameters.parambyname('p16').value:= strtoint(eid.Text);

      try
          ExecSQL;
       except on E:EDatabaseError do begin
         showmessage('수정 작업중 에러발생' +#13#10+ E.Message);
         end;
      end;
(이하생략)
0  COMMENTS