계속적인 전반적인 SQL에러라는 메시지가 계속 뜹니다.
DB는 MS_SQL2000을 쓰고 있습니다.
BDE를 이용해서 DB에 접속도 되고 조회도 되는데 이상하게 입력후 저장만 할려고 하면 위와 같은 에러 메시지가 뜨는데 왜 그런지요.....
어제 부터 계속해서 이러한 메시지가 뜨는데 답답합니다.
Insert 되는 부분의 소스는 아래와 같습니다.
----------------- 소 스 부 분 --------------------------
if txt_Code.Text ='' then begin
application.MessageBox ('코드가 없으면 저장 할수 없습니다.','입력오류',mb_ok);
txt_Code.SetFocus;
exit;
end
else begin
with DM.T_Counter do begin
open;
Insert;
FieldByName('코드').Value := strToint(txt_Code.Text);
FieldByName('상호명').AsString := txt_Name.Text;
FieldByName('사업자번호').AsString := txt_No.Text;
FieldByName('대표자').AsString := txt_Oner.Text;
FieldByName('전화번호').AsString := txt_Tel.Text;
FieldByName('FAX').AsString := txt_FAX.Text;
FieldByName('우편번호').AsString := txt_ZipCode.Text;
FieldByName('주소1').AsString := txt_Address1.Text;
FieldByName('주소2').AsString := txt_Address2.Text;
FieldByName('E_MAIL').AsString := txt_Mail.Text;
FieldByName('홈페이지').AsString := txt_HomePage.Text;
FieldByName('담당자').AsString := txt_Person.Text;
FieldByName('휴대전화').AsString := txt_Hp.Text;
Post;
Refresh;
end;
end;
----------------------------------------------------------------------
고수님들 부탁 드립니다.
많은 도움이 되었습니다.
제가 SQL에대한 공부를 조금 더해야 할것 같네요 . ^.^
그럼 즐거운 하루되시고요.
다음에도 많은 답변 바랍니다.