Q&A
- 서로 다른 DB insert 2...
개인기초 DB 의 필요한 필드를 추출하여
월간근태등록 DB에 Insert 하는 구문입니다.
DM4.Query1.ExecSQL;
DM4.Query1.Active:=True;
추가한 구문
procedure Tgunsang1_n.BitBtn15Click(Sender: TObject);
begin
if Idok = Application.Messagebox('정말로 연결하시겠습니까?', '인사정보연결',
MB_Okcancel + MB_Iconquestion) then
begin
DM4.Query1.Close;
DM4.Query1.SQL.Clear;
DM4.Query1.SQL.Add('Insert into 월간근태등록(Sa_no,Busea,Name_k,Jic_ch)');
DM4.Query1.SQL.Add(' select Sa_no, Name_k, Busea, Jic_ch from 개인기초');
DM4.Query1.SQL.Add(' Where Gn_gun = "재직"');
DM4.Query1.ExecSQL;
DM4.Query1.Active:=True;
end;
end; <= ★아래와 같이 에러 메세지 출력후 이줄을 가리킴니다.
end.
###################################################################################
실행시 에러메세지
Project Project1.exe raised xception class ENOResultSet With message 'Error creating
cursor handle','Process stopped, Use step or Run to continue.
상기와 같이 에러 메세지가 나옵니다.
SQL Explorer 에서는 실행이 됩니다.
Query, dataset, dbgrid 의 속성중에 특별히 조정해야하는 부분이 있나요......
월간근태등록 DB에 Insert 하는 구문입니다.
DM4.Query1.ExecSQL;
DM4.Query1.Active:=True;
추가한 구문
procedure Tgunsang1_n.BitBtn15Click(Sender: TObject);
begin
if Idok = Application.Messagebox('정말로 연결하시겠습니까?', '인사정보연결',
MB_Okcancel + MB_Iconquestion) then
begin
DM4.Query1.Close;
DM4.Query1.SQL.Clear;
DM4.Query1.SQL.Add('Insert into 월간근태등록(Sa_no,Busea,Name_k,Jic_ch)');
DM4.Query1.SQL.Add(' select Sa_no, Name_k, Busea, Jic_ch from 개인기초');
DM4.Query1.SQL.Add(' Where Gn_gun = "재직"');
DM4.Query1.ExecSQL;
DM4.Query1.Active:=True;
end;
end; <= ★아래와 같이 에러 메세지 출력후 이줄을 가리킴니다.
end.
###################################################################################
실행시 에러메세지
Project Project1.exe raised xception class ENOResultSet With message 'Error creating
cursor handle','Process stopped, Use step or Run to continue.
상기와 같이 에러 메세지가 나옵니다.
SQL Explorer 에서는 실행이 됩니다.
Query, dataset, dbgrid 의 속성중에 특별히 조정해야하는 부분이 있나요......
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 김범수
- •
- 2001.01.12 23:27
- 1 COMMENTS
- /
- 0 LIKES
개인기초 DB 의 필요한 필드를 추출하여 월간근태등록 DB에 Insert 하는 구문입니다. DM4.Query1.ExecSQL; DM4.Query1.Active:=True; 추가한 구문 procedure Tgunsang1_n.BitBtn15Click(Sender: TObject); begin if Idok = Application.Me...-
액션가면•2001.01.12 23:52안녕하세여... Query는 TDataSet의 자식입니다.. TDataSet의 Open프로시져를 찾아보면 아래와같습니다....
-
- 델파이초보
- •
- 2001.01.12 23:27
- 1 COMMENTS
- /
- 0 LIKES
-
손상수•2001.04.19 20:01죄송한데요... 이거 혹시 해결하셨나요? 저두 이것땜에 5일째 고민 중이랍니다. 염치없지만 해결하셨다...
-
- 아챙피...
- •
- 2001.01.12 22:57
- 2 COMMENTS
- /
- 0 LIKES
-
^___^•2001.01.13 00:35혹시 edit 명령 실행하셨나여..state가 edit상태가 아닌 거 같은데 전 전에 잘되써꺼덩여 혹시 안하...
-
아챙피...•2001.01.16 02:21물론 했습니다.. trace로 따라가보면 tablename.edit 이 부분에서 error가 납니다.. T_T; ^___...
-
-
스나이퍼•2001.01.13 00:39디비는 뭘쓰시는데여..mysql은..필드 생성할때... 필드 속성을 Auto_increment로 잡음 되는데..sql도 아...
-
hope•2001.01.13 00:59음...디비는 dBase을 사용하구 있는데여.. MSACCESS로 바꾸려구요... MSACCESS에서는 어케해야돼져..?? ...
-
Webcome•2001.01.13 16:54가장 쉬운 방법으로는 access를 이용해 테이블을 디자인할 때 필드 속성을 일련번호로 해주면 되져..^^ ...
-
-
- 파이파이
- •
- 2001.01.12 22:45
- 2 COMMENTS
- /
- 0 LIKES
-
최영근•2001.01.13 02:41안녕하세요 ? 제가 요번에 사용한 루틴입니다. 이상없이 잘 작동합니다. 그럼 이만.. procedure ...
-
xdelphi•2001.01.12 23:40파이파이 wrote: > 질문> 해당디렉토리와 폴더를 모두 지우는 소스입니다. > 그런데 이게 잘 안되...
-
-
xdelphi•2001.01.12 23:08누리 wrote: > 합계금액을 한글로 변환할수있는 방법 좀 알려주세요 > > 예) 123000 > > 일십이...
-
-
- 김범수
- •
- 2001.01.12 22:12
- 2 COMMENTS
- /
- 0 LIKES
-
방경주•2001.01.12 22:19DM4.Query1.Open; 을 DM4.Query1.ExecSql; 로 바꾸어 보세여....DML문은 이것으루 한답니다... 김범...
-
xdelphi•2001.01.12 22:18김범수 wrote: > 개인기초 DB 에서 필요한 필드를 받아서 월간근태등록 DB에 Insert 하는 구문입니다. > ...
-
- 파이파이
- 2001.01.12 22:04
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보자
- 2001.01.12 21:37
- 0 COMMENTS
- /
- 0 LIKES
-
- 지영일
- •
- 2001.01.12 21:56
- 1 COMMENTS
- /
- 0 LIKES
-
parkisu•2001.01.15 07:06지영일 wrote: > TTabbedNoteBook 속성중 > Activepage와 Pageindex의 차이의 대해서 설명해 주셨으면 합...
-
- 미스터
- 2001.01.12 20:57
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 진상필
- •
- 2001.01.12 20:48
- 5 COMMENTS
- /
- 0 LIKES
-
xdelphi•2001.01.12 21:40
-
홍길동•2001.01.13 01:48
-
xdelphi•2001.01.13 03:48
-
홍길동•2001.01.13 05:20
-
진상필•2001.01.15 19:56
-
- 기세희
- 2001.01.12 20:46
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 김태영
- •
- 2001.01.12 20:18
- 2 COMMENTS
- /
- 0 LIKES
-
xdelphi•2001.01.12 20:59김태영 wrote: > 고수님 도와주세요. 알고리즘이 약해서라무래... > > i : WideString; > ...
-
최진석•2001.01.12 20:53음... var k,l : integer; str,madestr : string; i : WideString; j : array of array of WideSt...
-
- 과객
- 2001.01.12 20:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- 2001.01.12 19:11
- 0 COMMENTS
- /
- 0 LIKES
-
- 추운사람
- 2001.01.12 19:09
- 0 COMMENTS
- /
- 0 LIKES
-
- 윤똘
- 2001.01.12 18:45
- 0 COMMENTS
- /
- 0 LIKES
안녕하세여...
Query는 TDataSet의 자식입니다..
TDataSet의 Open프로시져를 찾아보면 아래와같습니다.
procedure TDataSet.Open;
begin
Active := True;
end;
결국 TdataSet.Open 과 Active := True 라는 문장은 같은 뜻입니다..
왜 에러가 났는지 이해가 가시겠지요?
Active := True <= 이문장을 지우면 해결됨다..
Select시에는 Open, 다른작업시에는 ExecSQL을 실행해보세염..
다른말로 하면 리턴받는 값의 유무를 따져서염..
좋은하루되세염
김범수 wrote:
> 개인기초 DB 의 필요한 필드를 추출하여
> 월간근태등록 DB에 Insert 하는 구문입니다.
>
> DM4.Query1.ExecSQL;
> DM4.Query1.Active:=True;
> 추가한 구문
>
>
> procedure Tgunsang1_n.BitBtn15Click(Sender: TObject);
> begin
> if Idok = Application.Messagebox('정말로 연결하시겠습니까?', '인사정보연결',
> MB_Okcancel + MB_Iconquestion) then
> begin
> DM4.Query1.Close;
> DM4.Query1.SQL.Clear;
> DM4.Query1.SQL.Add('Insert into 월간근태등록(Sa_no,Busea,Name_k,Jic_ch)');
> DM4.Query1.SQL.Add(' select Sa_no, Name_k, Busea, Jic_ch from 개인기초');
> DM4.Query1.SQL.Add(' Where Gn_gun = "재직"');
> DM4.Query1.ExecSQL;
> DM4.Query1.Active:=True;
> end;
> end; <= ★아래와 같이 에러 메세지 출력후 이줄을 가리킴니다.
>
> end.
>
> ###################################################################################
> 실행시 에러메세지
> Project Project1.exe raised xception class ENOResultSet With message 'Error creating
> cursor handle','Process stopped, Use step or Run to continue.
>
> 상기와 같이 에러 메세지가 나옵니다.
> SQL Explorer 에서는 실행이 됩니다.
> Query, dataset, dbgrid 의 속성중에 특별히 조정해야하는 부분이 있나요......