Q&A
- 테이블에 데이타를 입력할때...
테이블에 데이타를 입력할때,
데이타 베이스 엔진 에러가 나면... 에러가 보여 주는 것 까지는 되었는데...
에러가 보이고 나서... 그 테이블에 널값이 들어간답니다...
입력 에러가 났으면, 입력이 취소 되어야 하잖아여...
그런데 DataBaseDesktop로 테이블을 확인해 보면...
테이블에 빈 레코드가 입력되어 있더라구요....
부끄럽지만;;; 아래 소스를 올립니다...
뭐가 문제인지... 도와주세요...^^
procedure TF_Bank_info.BtnInsertClick(Sender: TObject);
begin
if EdtBankCode.Text='' then
begin
ShowMessage('은행코드를 입력하세요.');
exit;
end
else try
datamod.TblBank.Append;
Datamod.TblBank.FieldByName('BANKCODE').Asstring := EdtBankCode.Text;
datamod.TblBank.Post;
showMessage('저장 되었습니다.');
EdtBankCode.Text := '';
EdtBankname.Text := '';
except on E: EDBEngineError do
begin
if E.Errors[E.Errorcount - 1].ErrorCode = DBIERR_KEYVIOL then
ShowMessage('코드중복입니다.')
else
ShowMessage('입력오류입니다.');
datamod.TblBank.Cancel;
end;
else
begin
ShowMessage('입력오류입니다.');
datamod.TblBank.Cancel;
end;
end;
datamod.TblBank.Refresh;
end;
행복한 일주일 시작하세요~~~~~~~~~~~~~~~~~*
데이타 베이스 엔진 에러가 나면... 에러가 보여 주는 것 까지는 되었는데...
에러가 보이고 나서... 그 테이블에 널값이 들어간답니다...
입력 에러가 났으면, 입력이 취소 되어야 하잖아여...
그런데 DataBaseDesktop로 테이블을 확인해 보면...
테이블에 빈 레코드가 입력되어 있더라구요....
부끄럽지만;;; 아래 소스를 올립니다...
뭐가 문제인지... 도와주세요...^^
procedure TF_Bank_info.BtnInsertClick(Sender: TObject);
begin
if EdtBankCode.Text='' then
begin
ShowMessage('은행코드를 입력하세요.');
exit;
end
else try
datamod.TblBank.Append;
Datamod.TblBank.FieldByName('BANKCODE').Asstring := EdtBankCode.Text;
datamod.TblBank.Post;
showMessage('저장 되었습니다.');
EdtBankCode.Text := '';
EdtBankname.Text := '';
except on E: EDBEngineError do
begin
if E.Errors[E.Errorcount - 1].ErrorCode = DBIERR_KEYVIOL then
ShowMessage('코드중복입니다.')
else
ShowMessage('입력오류입니다.');
datamod.TblBank.Cancel;
end;
else
begin
ShowMessage('입력오류입니다.');
datamod.TblBank.Cancel;
end;
end;
datamod.TblBank.Refresh;
end;
행복한 일주일 시작하세요~~~~~~~~~~~~~~~~~*
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 아야
- 1999.12.14 03:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 송수현
- •
- 1999.12.14 01:15
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•1999.12.14 03:14송수현 wrote: > 안녕하세요 봐주셔서 감사합니다. 꾸벅~! > > Table을 생성하고 DataSource1, Table1,...
-
- 클릭
- •
- 1999.12.13 23:26
- 3 COMMENTS
- /
- 0 LIKES
-
정재훈•1999.12.14 20:58클릭 wrote: > query을 사용하여 db그리드에 데이타를 뿌려주었는데.. > 마우스로 db그리드의 특정 row를...
-
정재훈•1999.12.14 20:57클릭 wrote: > query을 사용하여 db그리드에 데이타를 뿌려주었는데.. > 마우스로 db그리드의 특정 row를...
-
구창민•1999.12.14 03:18클릭 wrote: > query을 사용하여 db그리드에 데이타를 뿌려주었는데.. > 마우스로 db그리드의 특정 row를...
-
- djha
- •
- 1999.12.13 23:00
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•1999.12.14 03:32djha wrote: > > 메모컴포넌트로 간단한 텍스트 에디터를 > 만들어 보고 있는데요. > > 하트나 별표...
-
- 한
- •
- 1999.12.13 22:36
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•1999.12.14 18:07한 wrote: > 제목 되로 입니다. > 바더보드의 시리얼번호가 있는걸로 아는데 알수 있는 방법이 없을까요?...
-
- 김 성중
- •
- 1999.12.13 21:36
- 1 COMMENTS
- /
- 0 LIKES
-
송두호•2001.01.16 06:36위 에러는 NT계열 운영체계(NT, 2000)에서 일어나는듯 하고 메모리와 관련 있는듯 합니다 자세한 것은 ...
-
- copretns
- 1999.12.13 21:27
- 0 COMMENTS
- /
- 0 LIKES
-
- 박진선
- 1999.12.15 18:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 클릭
- 1999.12.13 20:48
- 0 COMMENTS
- /
- 0 LIKES
-
- copretns
- •
- 1999.12.13 20:36
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•1999.12.13 20:45copretns wrote: > 안녕하세요...영대님... > 영대님의 세미나 잘 보았습니다... > > 저어~ 질문이 있...
-
- 김경아
- •
- 1999.12.13 20:10
- 1 COMMENTS
- /
- 0 LIKES
-
김상면•1999.12.13 20:58SQL.Add('SELECT * FROM DISTRIBU '); SQL.Add('WHERE D_NAME_H like '''+ed_Name.Text+'%'' ')...
-
- 프리미엄
- •
- 1999.12.13 19:11
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•1999.12.13 20:22프리미엄 wrote: > query를 사용해서 update를 하는데요.. > 폼상에 DB그리드를 사용해서 나타내 주었구...
-
- 김매경
- •
- 1999.12.13 18:47
- 1 COMMENTS
- /
- 0 LIKES
테이블에 데이타를 입력할때, 데이타 베이스 엔진 에러가 나면... 에러가 보여 주는 것 까지는 되었는데... 에러가 보이고 나서... 그 테이블에 널값이 들어간답니다... 입력 에러가 났으면, 입력이 취소 되어야 하잖아여... 그런데 DataB...-
김영대•1999.12.13 20:24김매경 wrote: > 테이블에 데이타를 입력할때, > 데이타 베이스 엔진 에러가 나면... 에러가 보여 주는 ...
-
- 무스탕
- •
- 1999.12.13 18:42
- 3 COMMENTS
- /
- 0 LIKES
-
김영대•1999.12.13 20:30무스탕 wrote: > 안녕하세요! > 추운날씨에 고생이 많으십니다. > 몇가지 궁금한 점이 있어 글을 남김니...
-
무스탕•1999.12.13 22:25안녕하세요! 무스탕입니다. 이렇게 도움을 많이 주셔서 감사합니다. 제가 얼마전에 아이디를 바꾸어...
-
무스탕•1999.12.13 22:25안녕하세요! 무스탕입니다. 이렇게 도움을 많이 주셔서 감사합니다. 제가 얼마전에 아이디를 바꾸어...
-
- 이미선
- •
- 1999.12.13 18:23
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•1999.12.13 20:38이미선 wrote: > Treeview에서 item에 imagelist의 imageindex를 부여하고 Selected index를 사용해서 선...
-
- 초보자
- 1999.12.13 08:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 임형호
- 1999.12.13 05:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 문영미
- •
- 1999.12.12 23:30
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•1999.12.13 20:34문영미 wrote: > 안녕하세요! > > WindowsNT 상에서 Setup 하고 > 실행하려고 하는데 아래와 같은 에...
-
- 이현신
- 1999.12.12 23:17
- 0 COMMENTS
- /
- 0 LIKES
-
- 이재민
- •
- 1999.12.12 21:15
- 1 COMMENTS
- /
- 0 LIKES
-
이재식•1999.12.13 07:38이재식 Wrote : 안녕하세요? onNeedData이벤트 역시 보통 DetailBand를 쓰는 방법과 같습니다. 우선 ...
> 테이블에 데이타를 입력할때,
> 데이타 베이스 엔진 에러가 나면... 에러가 보여 주는 것 까지는 되었는데...
> 에러가 보이고 나서... 그 테이블에 널값이 들어간답니다...
> 입력 에러가 났으면, 입력이 취소 되어야 하잖아여...
> 그런데 DataBaseDesktop로 테이블을 확인해 보면...
> 테이블에 빈 레코드가 입력되어 있더라구요....
> 부끄럽지만;;; 아래 소스를 올립니다...
> 뭐가 문제인지... 도와주세요...^^
>
>
> procedure TF_Bank_info.BtnInsertClick(Sender: TObject);
> begin
> if EdtBankCode.Text='' then
> begin
> ShowMessage('은행코드를 입력하세요.');
> exit;
> end
> else try
> datamod.TblBank.Append;
> Datamod.TblBank.FieldByName('BANKCODE').Asstring := EdtBankCode.Text;
> datamod.TblBank.Post;
> showMessage('저장 되었습니다.');
> EdtBankCode.Text := '';
> EdtBankname.Text := '';
> except on E: EDBEngineError do
> begin
> if E.Errors[E.Errorcount - 1].ErrorCode = DBIERR_KEYVIOL then
> ShowMessage('코드중복입니다.')
> else
> ShowMessage('입력오류입니다.');
> datamod.TblBank.Cancel;
> end;
> else
> begin
> ShowMessage('입력오류입니다.');
> datamod.TblBank.Cancel;
> end;
> end;
> datamod.TblBank.Refresh;
> end;
>
> 행복한 일주일 시작하세요~~~~~~~~~~~~~~~~~*
DataBase의 commit, rollback 을 참고해 보세요