Q&A
- 급해여
델파이 프로그램을 짜는데여 아무것두 모른채로 해야하니까
많이 어렵네여
입력 삭제 검색 수정의 프로그램인데여
델파이 desktop이라는 것에 테이블을 만들었습니다.
테이블은 6개이구여
각 테이블에 insert를 시키는데
다른 테이블은 에러가 생기지 않은데
2개의 테이블이 key violation이라는 에러가 생기더군여
소스를 붙여서 보냅니다.
시간이 있으시면 답변을 기다리겠습니다.
SSQL := 'INSERT INTO DBOUTPUT VALUES(:A1, :AF1, :AF2, :AF3, :AF4, :AF5)';
FORM2.QUERY6.SQL.ADD(SSQL);
FORM2.QUERY6.PARAMBYNAME('A1').ASSTRING := TRIM(EDIT1.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF1').ASSTRING := TRIM(EDIT26.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF2').ASSTRING := TRIM(EDIT27.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF3').ASSTRING := TRIM(EDIT28.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF4').ASSTRING := TRIM(EDIT29.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF5').ASSTRING := TRIM(EDIT30.TEXT);
(* SSQL := 'INSERT INTO Dboutput VALUES(' +
FORMAT('''$S''', [TRIM(EDIT26.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT27.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT28.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT29.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT30.TEXT)])+
')'; *)
TRY
// FORM2.QUERY6.SQL.ADD(SSQL);
FORM2.QUERY6.EXECSQL;
EXCEPT
FORM2.Query6.CLOSE;
Application.MessageBox('OUTPUT 테이블 저장도중 Error 발생!!!','오류', mb_ok+mb_IconInformation);
Exit;
end;
FORM2.QUERY6.Close;
많이 어렵네여
입력 삭제 검색 수정의 프로그램인데여
델파이 desktop이라는 것에 테이블을 만들었습니다.
테이블은 6개이구여
각 테이블에 insert를 시키는데
다른 테이블은 에러가 생기지 않은데
2개의 테이블이 key violation이라는 에러가 생기더군여
소스를 붙여서 보냅니다.
시간이 있으시면 답변을 기다리겠습니다.
SSQL := 'INSERT INTO DBOUTPUT VALUES(:A1, :AF1, :AF2, :AF3, :AF4, :AF5)';
FORM2.QUERY6.SQL.ADD(SSQL);
FORM2.QUERY6.PARAMBYNAME('A1').ASSTRING := TRIM(EDIT1.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF1').ASSTRING := TRIM(EDIT26.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF2').ASSTRING := TRIM(EDIT27.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF3').ASSTRING := TRIM(EDIT28.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF4').ASSTRING := TRIM(EDIT29.TEXT);
FORM2.QUERY6.PARAMBYNAME('AF5').ASSTRING := TRIM(EDIT30.TEXT);
(* SSQL := 'INSERT INTO Dboutput VALUES(' +
FORMAT('''$S''', [TRIM(EDIT26.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT27.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT28.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT29.TEXT)])+
FORMAT('''$S''', [TRIM(EDIT30.TEXT)])+
')'; *)
TRY
// FORM2.QUERY6.SQL.ADD(SSQL);
FORM2.QUERY6.EXECSQL;
EXCEPT
FORM2.Query6.CLOSE;
Application.MessageBox('OUTPUT 테이블 저장도중 Error 발생!!!','오류', mb_ok+mb_IconInformation);
Exit;
end;
FORM2.QUERY6.Close;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- sija
- 2001.02.03 04:23
- 0 COMMENTS
- /
- 0 LIKES
-
- 임성오
- •
- 2001.02.03 04:14
- 2 COMMENTS
- /
- 0 LIKES
-
NZMan•2001.02.04 20:48임성오 wrote: > Query1.close; > Query1.open; > Query1.recordcount 어찌된거죠? 무려 2000개가 있어...
-
delman•2001.02.03 04:39임성오 wrote: > Query1.close; > Query1.open; > Query1.recordcount 어찌된거죠? 무려 2000개가 있어...
-
- delman
- 2001.02.03 04:11
- 0 COMMENTS
- /
- 0 LIKES
-
- 이호림
- •
- 2001.02.03 04:06
- 1 COMMENTS
- /
- 0 LIKES
-
delman•2001.02.03 04:27이호림 wrote: > > 안녕하세요. 이호림이라고 합니다. > > 델파이에서는 콤보박스라고 부르고 html ...
-
- 모름이
- 2001.02.03 03:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 김지영
- 2001.02.03 03:27
- 0 COMMENTS
- /
- 0 LIKES
-
- 모기
- •
- 2001.02.03 03:11
- 1 COMMENTS
- /
- 0 LIKES
-
처보여•2001.02.03 04:12죄송합니다. 저두 잘모르지만 글을 보던중 이상한게 있어서 이케 몇자 적습니다. ACCESSDB[이하MDB]를 ...
-
- 어린왕자
- 2001.02.03 03:09
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕왕초보
- •
- 2001.02.03 02:50
- 1 COMMENTS
- /
- 0 LIKES
-
coolling•2001.02.03 03:05네트웍으로 공유된 폴더를 네트웍드라이버로 잡고 BDE Administration에서 new로 알리어스를 하나 생성하...
-
- 강국일
- 2001.02.03 02:48
- 0 COMMENTS
- /
- 0 LIKES
-
- 델파이
- •
- 2001.02.03 02:36
- 1 COMMENTS
- /
- 0 LIKES
델파이 프로그램을 짜는데여 아무것두 모른채로 해야하니까 많이 어렵네여 입력 삭제 검색 수정의 프로그램인데여 델파이 desktop이라는 것에 테이블을 만들었습니다. 테이블은 6개이구여 각 테이블에 insert를 시키는데 다른 테이블은 에...-
friggacho•2001.02.03 02:43혹시...테이블에서 Primarykey를 잡아준 부분에서 동일한 값을 입력하시지 않았는지 모르겠네요...그 부분...
-
- 델초
- •
- 2001.02.03 02:36
- 1 COMMENTS
- /
- 0 LIKES
-
토마토•2001.02.05 20:37델초 wrote: > 안녕하세요.. > 저의쪽에서는 DB를 3-4개정도 기본으로 사용하고있는데.. DB를 바꾸어 사...
-
-
- 궁금이
- •
- 2001.02.03 02:27
- 2 COMMENTS
- /
- 0 LIKES
-
미남과암야수•2001.02.03 03:18그리드 이벤트중에 OnEnter 이벤트가 있습니다... 고기에 지우는 루틴을 넣주시면 됩니다... procedu...
-
궁금이•2001.02.03 03:31답변 감사합니다... 그런데... 그 그리드에 포커스가 있을때.. 그 그리드의 내용을 지운다는것이 아니라...
-
- 순
- 2001.02.03 01:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- •
- 2001.02.03 01:47
- 2 COMMENTS
- /
- 0 LIKES
-
노용환•2001.02.03 18:21초보 wrote: > Check 필드의 값이 0 인경우는 1 로 1인 경우는 0 으로 만드는 쿼리문은 어떻게 > 만들어...
-
미남과암야수•2001.02.03 01:58초보 wrote: > Check 필드의 값이 0 인경우는 1 로 1인 경우는 0 으로 만드는 쿼리문은 어떻게 > 만들어...
-
- 준...
- •
- 2001.02.03 01:35
- 2 COMMENTS
- /
- 0 LIKES
-
토마토•2001.02.05 20:43준... wrote: > 안녕하세요. > 프로그램을 만들다가 문제가 생겼는데 Ord() 함수 좀 설명 해 주세요. > ...
-
반칙왕•2001.02.03 01:46준... wrote: > 안녕하세요. > 프로그램을 만들다가 문제가 생겼는데 Ord() 함수 좀 설명 해 주세요. > ...
-
-
- 조장선
- 2001.02.03 01:23
- 0 COMMENTS
- /
- 0 LIKES
-
- 이원택
- •
- 2001.02.03 01:09
- 3 COMMENTS
- /
- 0 LIKES
-
반칙왕•2001.02.03 01:37이원택 wrote: > dbgrid에서 원하는 cell을 클릭할경우 원하는 text박스에 그 내용이 들어가게하려고 > ...
-
뻐록이•2001.02.03 05:00반칙왕 wrote: > 이원택 wrote: > > dbgrid에서 원하는 cell을 클릭할경우 원하는 text박스에 그 내용이 ...
-
반칙왕•2001.02.03 19:10뻐록이 wrote: > 반칙왕 wrote: > > 이원택 wrote: > > > dbgrid에서 원하는 cell을 클릭할경우 원하는 ...
입력하시지 않았는지 모르겠네요...그 부분을 한번 확인해 보세요
델파이 wrote:
> 델파이 프로그램을 짜는데여 아무것두 모른채로 해야하니까
> 많이 어렵네여
> 입력 삭제 검색 수정의 프로그램인데여
> 델파이 desktop이라는 것에 테이블을 만들었습니다.
>
> 테이블은 6개이구여
> 각 테이블에 insert를 시키는데
> 다른 테이블은 에러가 생기지 않은데
> 2개의 테이블이 key violation이라는 에러가 생기더군여
> 소스를 붙여서 보냅니다.
>
> 시간이 있으시면 답변을 기다리겠습니다.
>
>
>
>
> SSQL := 'INSERT INTO DBOUTPUT VALUES(:A1, :AF1, :AF2, :AF3, :AF4, :AF5)';
>
> FORM2.QUERY6.SQL.ADD(SSQL);
>
> FORM2.QUERY6.PARAMBYNAME('A1').ASSTRING := TRIM(EDIT1.TEXT);
> FORM2.QUERY6.PARAMBYNAME('AF1').ASSTRING := TRIM(EDIT26.TEXT);
> FORM2.QUERY6.PARAMBYNAME('AF2').ASSTRING := TRIM(EDIT27.TEXT);
> FORM2.QUERY6.PARAMBYNAME('AF3').ASSTRING := TRIM(EDIT28.TEXT);
> FORM2.QUERY6.PARAMBYNAME('AF4').ASSTRING := TRIM(EDIT29.TEXT);
> FORM2.QUERY6.PARAMBYNAME('AF5').ASSTRING := TRIM(EDIT30.TEXT);
>
>
>
> (* SSQL := 'INSERT INTO Dboutput VALUES(' +
> FORMAT('''$S''', [TRIM(EDIT26.TEXT)])+
> FORMAT('''$S''', [TRIM(EDIT27.TEXT)])+
> FORMAT('''$S''', [TRIM(EDIT28.TEXT)])+
> FORMAT('''$S''', [TRIM(EDIT29.TEXT)])+
> FORMAT('''$S''', [TRIM(EDIT30.TEXT)])+
> ')'; *)
>
> TRY
> // FORM2.QUERY6.SQL.ADD(SSQL);
> FORM2.QUERY6.EXECSQL;
>
> EXCEPT
> FORM2.Query6.CLOSE;
>
> Application.MessageBox('OUTPUT 테이블 저장도중 Error 발생!!!','오류', mb_ok+mb_IconInformation);
> Exit;
>
> end;
> FORM2.QUERY6.Close;
>