아래와 같이 코딩을 하였습니다.

ADO로 처음 해보는데 이곳 게시판에서 여러가지를 종합하여 아래와 같이

코딩하였습니다.

컴파일은 정상적으로 되는데 실행후에 자료를 입력하면

"ADOWorkQuery:Parameters 'comcode' not found"라고 나오는 군요.

어디를 어떻게 고쳐야 하는지요?









ADOWorkQuery.Close;

ADOWorkQuery.SQL.Clear;

ADOWorkQuery.SQL.Add('insert into company');

ADOWorkQuery.SQL.Add(' (comcode, company, owner, entryno, bizcategory, bizitem, phone, fax, comgroup, nextday)');

ADOWorkQuery.SQL.Add(' Values (:ycomcode, :ycompany, :yowner, :yentryno, :ybizcategory, :ybizitem., :yphone, :yfax, :ycomgroup, :ynextday)');





ADOWorkQuery.Parameters.ParamByName('ycomcode').Value := xcomcode.Text;

ADOWorkQuery.Parameters.ParamByName('ycompany').Value := xcompany.Text;

ADOWorkQuery.Parameters.ParamByName('yowner').Value := xowner.Text;

ADOWorkQuery.Parameters.ParamByName('yentryno').Value := xentryno.Text;

ADOWorkQuery.Parameters.ParamByName('ybizcategory').Value := xbizcategory.Text;

ADOWorkQuery.Parameters.ParamByName('ybizitem').Value := xbizitem.Text;

ADOWorkQuery.Parameters.ParamByName('yphone').Value := xphone.Text;

ADOWorkQuery.Parameters.ParamByName('yfax').Value := xfax.Text;

ADOWorkQuery.Parameters.ParamByName('ycomgroup').Value := xcomgroup.Text;

ADOWorkQuery.Parameters.ParamByName('ynextday').Value := xnextday.Text;



ADOWorkQuery.ExecSQL;



ADOViewQuery.Close;

ADOViewQuery.Open;