Q&A
- Re: sql을 사용한 수정 부분입니다...실행은 되는데 수정이 되지않아요..조언좀...
안녕하세요
청개구리 남기석입니다.
제가 볼때.... 이대로 실행하면 Error가 날 것 같은데요...
항목들 사이에 ','가 안보여서요...
음..옮겨 적으면서 빼먹으신 거겠죠?
실행이 된다고 하신걸 보면요..
암튼...이렇게 해 보세요..
with query1 do
begin
close;
sql.clear;
sql.Add(' update dlp4 set');
sql.add(' name=:name,');
sql.add(' code=:code,');
sql.add(' teachar=:teachar,');
sql.add(' old=:old');
sql.Add(' where name=:name');
sql.add(' and teachar='''+teachar+'''');
sql.add(' and old='''+old+'''');
parambyname('name').asstring:=edit1.text;
parambyname('code').asstring:=edit2.text;
parambyname('teachar').asstring:=combobox2.text;
parambyname('old').asstring:=combobox1.text;
execsql;
end;
제가 볼땐...
Where 문장의 name 때문에 저장이 안된 것 같네요...
파라미터 넘길때... 'edit1.text' 라고 하면...
edit1 이라는 콘트롤의 text 값이 넘어가는게 아니고...
'edit1.text' 라는 스트링이 넘어가니까요...
Update 문장은 조건과 같은게 없으면...
실행만되고 아무것도 바뀌는게 없거든요...
행복하세요...
========================================================================================
델파이 초보자 wrote:
> with query1 do
> begin
> close;
> sql.clear;
> sql.Add('update dlp4 set');
> sql.add('name=:name');
> sql.add('code=:code');
> sql.add('teachar=:teachar');
> sql.add('old=:old');
> sql.Add('where name =:name ');
> sql.add('and teachar='''+teachar+'''');
> sql.add('and old='''+old+'''');
> prepare;
> parambyname('name').asstring:='edit1.text';
> parambyname('code').asstring:='edit2.text';
> parambyname('teachar').asstring:='combobox2.text';
> parambyname('old').asstring:='combobox1.text';
> execsql;
> showmessage('선택항목을 수정하였습니다');
>
청개구리 남기석입니다.
제가 볼때.... 이대로 실행하면 Error가 날 것 같은데요...
항목들 사이에 ','가 안보여서요...
음..옮겨 적으면서 빼먹으신 거겠죠?
실행이 된다고 하신걸 보면요..
암튼...이렇게 해 보세요..
with query1 do
begin
close;
sql.clear;
sql.Add(' update dlp4 set');
sql.add(' name=:name,');
sql.add(' code=:code,');
sql.add(' teachar=:teachar,');
sql.add(' old=:old');
sql.Add(' where name=:name');
sql.add(' and teachar='''+teachar+'''');
sql.add(' and old='''+old+'''');
parambyname('name').asstring:=edit1.text;
parambyname('code').asstring:=edit2.text;
parambyname('teachar').asstring:=combobox2.text;
parambyname('old').asstring:=combobox1.text;
execsql;
end;
제가 볼땐...
Where 문장의 name 때문에 저장이 안된 것 같네요...
파라미터 넘길때... 'edit1.text' 라고 하면...
edit1 이라는 콘트롤의 text 값이 넘어가는게 아니고...
'edit1.text' 라는 스트링이 넘어가니까요...
Update 문장은 조건과 같은게 없으면...
실행만되고 아무것도 바뀌는게 없거든요...
행복하세요...
========================================================================================
델파이 초보자 wrote:
> with query1 do
> begin
> close;
> sql.clear;
> sql.Add('update dlp4 set');
> sql.add('name=:name');
> sql.add('code=:code');
> sql.add('teachar=:teachar');
> sql.add('old=:old');
> sql.Add('where name =:name ');
> sql.add('and teachar='''+teachar+'''');
> sql.add('and old='''+old+'''');
> prepare;
> parambyname('name').asstring:='edit1.text';
> parambyname('code').asstring:='edit2.text';
> parambyname('teachar').asstring:='combobox2.text';
> parambyname('old').asstring:='combobox1.text';
> execsql;
> showmessage('선택항목을 수정하였습니다');
>
5
COMMENTS
-
-
안녕하세요
청개구리 남기석입니다.
체크박스로 체크해야 하는 필드가 Boolean 형이라면...
sql.add( ' where 어쩌구 저쩌구 ');
sql.add( ' and CheckField1 = :pCheck1 ');
parambyname('pCheck1').asBoolean := checkbox1.checked;
체크박스로 체크해야 하는 필드가 String 형이라면...
sql.add( ' where 어쩌구 저쩌구 ');
sql.add( ' and CheckString1 = :pCheckString ');
if CheckBox1.Checked then
parambyname('pCheckString').asString := '1'
else
parambyname('pCheckString').asString := '0';
이렇게 하세요...
==============================================================================
한미르 wrote:
> 어~수정 코딩 부분에서요..checkbox는 어떻게 처리하는지...!!
> 다른 컴포넌트들을 다했는데...checkbox땜에..잘안돼네여..빨리 고쳐서...
> 언능언능 해야하는데....
> 청개구리님...알려주세요..
> 남기석 wrote:
> > 안녕하세요
> > 청개구리 남기석입니다.
> >
> > 제가 볼때.... 이대로 실행하면 Error가 날 것 같은데요...
> > 항목들 사이에 ','가 안보여서요...
> > 음..옮겨 적으면서 빼먹으신 거겠죠?
> > 실행이 된다고 하신걸 보면요..
> >
> > 암튼...이렇게 해 보세요..
> >
> > with query1 do
> > begin
> > close;
> > sql.clear;
> > sql.Add(' update dlp4 set');
> > sql.add(' name=:name,');
> > sql.add(' code=:code,');
> > sql.add(' teachar=:teachar,');
> > sql.add(' old=:old');
> > sql.Add(' where name=:name');
> > sql.add(' and teachar='''+teachar+'''');
> > sql.add(' and old='''+old+'''');
> > parambyname('name').asstring:=edit1.text;
> > parambyname('code').asstring:=edit2.text;
> > parambyname('teachar').asstring:=combobox2.text;
> > parambyname('old').asstring:=combobox1.text;
> > execsql;
> > end;
> >
> > 제가 볼땐...
> > Where 문장의 name 때문에 저장이 안된 것 같네요...
> >
> > 파라미터 넘길때... 'edit1.text' 라고 하면...
> > edit1 이라는 콘트롤의 text 값이 넘어가는게 아니고...
> > 'edit1.text' 라는 스트링이 넘어가니까요...
> >
> > Update 문장은 조건과 같은게 없으면...
> > 실행만되고 아무것도 바뀌는게 없거든요...
> >
> > 행복하세요...
> >
> > ========================================================================================
> > 델파이 초보자 wrote:
> > > with query1 do
> > > begin
> > > close;
> > > sql.clear;
> > > sql.Add('update dlp4 set');
> > > sql.add('name=:name');
> > > sql.add('code=:code');
> > > sql.add('teachar=:teachar');
> > > sql.add('old=:old');
> > > sql.Add('where name =:name ');
> > > sql.add('and teachar='''+teachar+'''');
> > > sql.add('and old='''+old+'''');
> > > prepare;
> > > parambyname('name').asstring:='edit1.text';
> > > parambyname('code').asstring:='edit2.text';
> > > parambyname('teachar').asstring:='combobox2.text';
> > > parambyname('old').asstring:='combobox1.text';
> > > execsql;
> > > showmessage('선택항목을 수정하였습니다');
> > >
-
감사합니다...
정말루 고마워요..
정말루 급했는데 이렇게 빨리 답변을 받을지는 몰랐어요..
고맙다는 말뿐만 생각이나내요..
저는 진짜 왕초보로 잘모르거든요..아무튼 정말루 감사합니다
남기석 wrote:
> 안녕하세요
> 청개구리 남기석입니다.
>
> 제가 볼때.... 이대로 실행하면 Error가 날 것 같은데요...
> 항목들 사이에 ','가 안보여서요...
> 음..옮겨 적으면서 빼먹으신 거겠죠?
> 실행이 된다고 하신걸 보면요..
>
> 암튼...이렇게 해 보세요..
>
> with query1 do
> begin
> close;
> sql.clear;
> sql.Add(' update dlp4 set');
> sql.add(' name=:name,');
> sql.add(' code=:code,');
> sql.add(' teachar=:teachar,');
> sql.add(' old=:old');
> sql.Add(' where name=:name');
> sql.add(' and teachar='''+teachar+'''');
> sql.add(' and old='''+old+'''');
> parambyname('name').asstring:=edit1.text;
> parambyname('code').asstring:=edit2.text;
> parambyname('teachar').asstring:=combobox2.text;
> parambyname('old').asstring:=combobox1.text;
> execsql;
> end;
>
> 제가 볼땐...
> Where 문장의 name 때문에 저장이 안된 것 같네요...
>
> 파라미터 넘길때... 'edit1.text' 라고 하면...
> edit1 이라는 콘트롤의 text 값이 넘어가는게 아니고...
> 'edit1.text' 라는 스트링이 넘어가니까요...
>
> Update 문장은 조건과 같은게 없으면...
> 실행만되고 아무것도 바뀌는게 없거든요...
>
> 행복하세요...
>
> ========================================================================================
> 델파이 초보자 wrote:
> > with query1 do
> > begin
> > close;
> > sql.clear;
> > sql.Add('update dlp4 set');
> > sql.add('name=:name');
> > sql.add('code=:code');
> > sql.add('teachar=:teachar');
> > sql.add('old=:old');
> > sql.Add('where name =:name ');
> > sql.add('and teachar='''+teachar+'''');
> > sql.add('and old='''+old+'''');
> > prepare;
> > parambyname('name').asstring:='edit1.text';
> > parambyname('code').asstring:='edit2.text';
> > parambyname('teachar').asstring:='combobox2.text';
> > parambyname('old').asstring:='combobox1.text';
> > execsql;
> > showmessage('선택항목을 수정하였습니다');
> >
-
> >
정말루 감사합니다..
사실은 제대로 실행이 안되었거든요...
근데 저도 모르게 된다고 쓰고 말았어요..
아무튼 정말루 고마습니다..
다음에 의문점이 생기면 또 질문을 할께요..
그때도 친절하게 가르쳐 주시면 감사해요..
~~실행은 되느데 결과값이 바뀌지 않아요..
뭐가 잘못된건지...다시 한번만 더 조언좀 부탁해요.
이런식으로 변수도 선언해주었는데..
뭔가 이상한거 같아요..
에러는 없는데 결과가 변하지 않아요..
var
Form3: TForm3;
code_div:string;
teachar_div:string;
old_div:string;
implementation
uses Unit1;
procedure TForm3.ToolButton1Click(Sender: TObject);
begin
with query1 do
begin
close;
sql.clear;
sql.Add(' update dlp4 set');
sql.add(' name=:name,');
sql.add(' code=:code,');
sql.add(' teachar=:teachar,');
sql.add(' old=:old');
sql.Add(' where name=:name');
sql.add(' and teachar='''+teachar_div+'''');
sql.add(' and old='''+old_div+'''');
parambyname('name').asstring:=edit1.text;
parambyname('code').asstring:=edit2.text;
parambyname('teachar').asstring:=combobox2.text;
parambyname('old').asstring:=combobox1.text;
execsql;
showmessage('선택항목을 수정하였습니다');
form1.query1.close;
form1.query1.open;
close;
-
안녕하세요...
코딩을 보니 update 문에 수정하고자 하는 필드가 code 밖에 없는것 같은데...
이렇게 코딩해 보시죠^^
with query1 do
begin
close;
sql.clear;
sql.Add(' update dlp4 set code=:code');
sql.Add(' where name=:name and teachar=:teachar and old= :old');
parambyname('name').asstring:=trim(edit1.text);
parambyname('code').asstring:=trim(edit2.text);
parambyname('teachar').asstring:=trim(combobox2.text);
parambyname('old').asstring:=trim(combobox1.text);
execsql;
showmessage('선택항목을 수정하였습니다');
> var
> Form3: TForm3;
> code_div:string;
> teachar_div:string;
> old_div:string;
>
>
> implementation
>
> uses Unit1;
> procedure TForm3.ToolButton1Click(Sender: TObject);
> begin
>
> with query1 do
> begin
> close;
> sql.clear;
> sql.Add(' update dlp4 set');
> sql.add(' name=:name,');
> sql.add(' code=:code,');
> sql.add(' teachar=:teachar,');
> sql.add(' old=:old');
> sql.Add(' where name=:name');
> sql.add(' and teachar='''+teachar_div+'''');
> sql.add(' and old='''+old_div+'''');
> parambyname('name').asstring:=edit1.text;
> parambyname('code').asstring:=edit2.text;
> parambyname('teachar').asstring:=combobox2.text;
> parambyname('old').asstring:=combobox1.text;
> execsql;
> showmessage('선택항목을 수정하였습니다');
> form1.query1.close;
> form1.query1.open;
> close;
>
(NOTICE) You must be logged in to comment on this post.
-
- 델파이초보
- •
- 2000.10.19 11:30
- 2 COMMENTS
- /
- 0 LIKES
-
궁그미•2000.10.19 18:18델파이초보 wrote: > 첫번째로는 > 예)c:프로그램DB DB디렉토리 까지 지정하는 방법은 없나요.? > > ...
-
김영대•2000.10.19 15:44델파이초보 wrote: > 첫번째로는 > 예)c:프로그램DB DB디렉토리 까지 지정하는 방법은 없나요.? > > ...
-
- 남기석
- •
- 2000.10.19 09:43
- 5 COMMENTS
- /
- 0 LIKES
안녕하세요 청개구리 남기석입니다. 제가 볼때.... 이대로 실행하면 Error가 날 것 같은데요... 항목들 사이에 ','가 안보여서요... 음..옮겨 적으면서 빼먹으신 거겠죠? 실행이 된다고 하신걸 보면요.. 암튼...이렇게 해 보세요.. with q...-
한미르•2000.10.19 14:38어~수정 코딩 부분에서요..checkbox는 어떻게 처리하는지...!! 다른 컴포넌트들을 다했는데...checkbox땜...
-
남기석•2000.10.20 10:11안녕하세요 청개구리 남기석입니다. 체크박스로 체크해야 하는 필드가 Boolean 형이라면... sql.add...
-
델파이 초보자•2000.10.19 13:31감사합니다... 정말루 고마워요.. 정말루 급했는데 이렇게 빨리 답변을 받을지는 몰랐어요.. 고맙다는 ...
-
델파이 초보자•2000.10.19 13:27> > 정말루 감사합니다.. 사실은 제대로 실행이 안되었거든요... 근데 저도 모르게 된다고 쓰고 말았...
-
이광형•2000.10.19 21:13안녕하세요... 코딩을 보니 update 문에 수정하고자 하는 필드가 code 밖에 없는것 같은데... 이렇게 코...
-
-
남기석•2000.10.19 10:09아래에 답변해 놨습니다. 델파이초보 wrote: > 안녕하세요.. > 다른 프로그램을 cord상으로 실행하는 ...
-
델파이초보•2000.10.19 11:17남기석 wrote: > 아래에 답변해 놨습니다. > > 델파이초보 wrote: > > 안녕하세요.. > > 다른 프로그...
-
-
- 생초보
- •
- 2000.10.19 07:37
- 1 COMMENTS
- /
- 0 LIKES
-
남기석•2000.10.19 09:54안녕하세요 청개구리 남기석입니다. 아래처럼 해 보세요... 설명은....음...백설이 불여일코!!!!!!1 ...
-
- 걸음마
- •
- 2000.10.19 06:33
- 3 COMMENTS
- /
- 0 LIKES
-
강인규•2000.10.19 06:45최대화시키기 WindowState := wsMaximized; 원래대로 WindowState := wsNormal; 미니마이즈...
-
걸음마•2000.10.19 06:56답변 감사합니다. 제가 찾는 것은 기냥 대입해서 얻는 화면의 변화가 아니라 화면우측상단에 있는 최대화 ...
-
윤종필•2000.10.19 07:32강인규님이 답한게 맞는 것 같은데요. 예를 들어 버튼의 OnClick 이벤트에 아래 문장을 넣어주면 되는 건...
-
- 급한이..
- 2000.10.19 05:04
- 0 COMMENTS
- /
- 0 LIKES
-
- 보건대학생
- •
- 2000.10.19 04:40
- 1 COMMENTS
- /
- 0 LIKES
-
프리지아•2000.10.19 05:27보건대학생 wrote: > 여러가지 방법을 써 봤는데 에라를 잡기 힘듭니다. 도와주세요~~ > 저는 왕초보거든...
-
- 전기봉
- •
- 2000.10.19 04:15
- 1 COMMENTS
- /
- 0 LIKES
-
홍호택•2000.11.15 05:27_____________________________________________________________________________ 델파이 팁에서 퍼온 것...
-
- 이용흔
- •
- 2000.10.19 03:52
- 1 COMMENTS
- /
- 0 LIKES
-
강인규•2000.10.19 05:16엔터는 #13#10 탭은 #9되겠습니당~~ ^-^ Memo1.Text := '이다음은 탭이당'+#9+'이담은 엔터당'+#13#10...
-
- 권경미
- •
- 2000.10.19 03:41
- 1 COMMENTS
- /
- 0 LIKES
-
한하눌•2000.10.19 07:10권경미 wrote: > 초보적인 질문일꺼 같네요...^^ > > 다름이 아니라 Oracle DB를 사용하고 있습니다. ...
-
- 권경미
- 2000.10.19 03:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 송상현
- •
- 2000.10.19 03:17
- 1 COMMENTS
- /
- 0 LIKES
-
Mr.Q•2000.10.19 07:44송상현 wrote: > Interbase로 프로그램을 만들었습니다. > 그런데 인스톨쉴드로 배포를 하려고 하는데 >...
-
- 델피언
- 2000.10.19 02:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕궁금..답답
- •
- 2000.10.19 02:47
- 1 COMMENTS
- /
- 0 LIKES
-
한하눌•2000.10.19 06:34왕궁금..답답 wrote: > 안녕하세요. > 이미 있는 db에 text파일을 읽어 일부를 insert해야 하는데 어떻게...
-
- 김진규
- •
- 2000.10.19 02:11
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•2000.10.19 15:52김진규 wrote: > 안녕하세요.. > > 간혹가다 어떤 프로그램을 실행시키면, 바탕화면에서 눈이 내리고, ...
-
- Freechat
- •
- 2000.10.19 02:01
- 1 COMMENTS
- /
- 0 LIKES
-
이정근•2000.10.19 02:17High(a), Low(a) 해보세요... High(a)+1 하면 4가 나오겠네요... Freechat wrote: > 예를 들어. > Se...
-
- 박세희
- 2000.10.19 01:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 델파이초보
- •
- 2000.10.19 01:51
- 1 COMMENTS
- /
- 0 LIKES
-
남기석•2000.10.19 10:09안녕하세요 청개구리 남기석입니다. EXE 파일 실행시키기... Winexec( 'c:winsabinshowme.exe', ...
-
-
투덜이•2000.10.19 02:45모달폼도 닫으까요 물어보고 닫고 싶으신거죠? 그 모달폼의 CloseQuery이벤트에서 메세지 박스를 띄우시고...
-
-
- 이상현
- •
- 2000.10.19 01:39
- 1 COMMENTS
- /
- 0 LIKES
-
프리지아•2000.10.19 05:32이상현 wrote: > 아래소스처럼하면 > memo1에 combobox1의 내용이 찍혀야되는거 아닌가염?.... > > pr...
다른 컴포넌트들을 다했는데...checkbox땜에..잘안돼네여..빨리 고쳐서...
언능언능 해야하는데....
청개구리님...알려주세요..
남기석 wrote:
> 안녕하세요
> 청개구리 남기석입니다.
>
> 제가 볼때.... 이대로 실행하면 Error가 날 것 같은데요...
> 항목들 사이에 ','가 안보여서요...
> 음..옮겨 적으면서 빼먹으신 거겠죠?
> 실행이 된다고 하신걸 보면요..
>
> 암튼...이렇게 해 보세요..
>
> with query1 do
> begin
> close;
> sql.clear;
> sql.Add(' update dlp4 set');
> sql.add(' name=:name,');
> sql.add(' code=:code,');
> sql.add(' teachar=:teachar,');
> sql.add(' old=:old');
> sql.Add(' where name=:name');
> sql.add(' and teachar='''+teachar+'''');
> sql.add(' and old='''+old+'''');
> parambyname('name').asstring:=edit1.text;
> parambyname('code').asstring:=edit2.text;
> parambyname('teachar').asstring:=combobox2.text;
> parambyname('old').asstring:=combobox1.text;
> execsql;
> end;
>
> 제가 볼땐...
> Where 문장의 name 때문에 저장이 안된 것 같네요...
>
> 파라미터 넘길때... 'edit1.text' 라고 하면...
> edit1 이라는 콘트롤의 text 값이 넘어가는게 아니고...
> 'edit1.text' 라는 스트링이 넘어가니까요...
>
> Update 문장은 조건과 같은게 없으면...
> 실행만되고 아무것도 바뀌는게 없거든요...
>
> 행복하세요...
>
> ========================================================================================
> 델파이 초보자 wrote:
> > with query1 do
> > begin
> > close;
> > sql.clear;
> > sql.Add('update dlp4 set');
> > sql.add('name=:name');
> > sql.add('code=:code');
> > sql.add('teachar=:teachar');
> > sql.add('old=:old');
> > sql.Add('where name =:name ');
> > sql.add('and teachar='''+teachar+'''');
> > sql.add('and old='''+old+'''');
> > prepare;
> > parambyname('name').asstring:='edit1.text';
> > parambyname('code').asstring:='edit2.text';
> > parambyname('teachar').asstring:='combobox2.text';
> > parambyname('old').asstring:='combobox1.text';
> > execsql;
> > showmessage('선택항목을 수정하였습니다');
> >