Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[7484] Re:ISAPI DLL을 디비에 저장하는방법
류종택 [] 777 읽음    2001-10-15 18:22
질문하신 문장이 다소 애매한 것 같습니다..
ISAPI DLL을 DB에 저장하시는 것이 아니고..
ISAPI DLL을 이용해서 입력된 파라메터 값을 DB에 입력하시는 것이겠지요??
이것은 ISAPI를 호출할 때 파라메터를 Post로 호출한 것인지??
아니면 Get 방식으로 호출하신 것인지에 따라 다릅니다..
여하튼 각각의 경우에
         mtPost : Data:= ContentFields;
         mtGet  : Data:= QueryFields;
와 같이 ContentFields 또는 QueryFields에 그 값이 전달됩니다..
이를 Qeuery문을 사용해서 입력하시면됩니다..
예제는 오라클을 사용했던 제 소스중 일부를 올려드립니다..
좀 다른 용도로 사용하던 것이라..
소스를 수정/삭제한 상태입니다..


From 류..

---------

procedure TWebModule1.WebModule1ListAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
Var
  Data : TStrings;
begin
  Data:= Nil;
  With Request do
    Case MethodType of
         mtPost : Data:= ContentFields;
         mtGet  : Data:= QueryFields;
    End;

  SQLQuery.SQL.Text:= 'Insert into %s ( UserID, UserPassword, CEMail, ' +
                      '                 Title, Memo, Tabs, FileName, FileSize, FileCode ) ' +
                      '       values ( :UserID, :UserPassword, :CEMail, ' +
                      '                :Title, :Memo, :Tabs, :FileName, :FileSize, :FileCode) ';
  SQLQuery.SQL.Text:= Format(SQLQuery.SQL.Text, [Data.Values['DB'], Data.Values['DB']]);
  SQLQuery.Prepared:= True;
  SQLQuery.ParamByName('UserID').AsString:=       Data.Values['UserID'];
  SQLQuery.ParamByName('UserPassword').AsString:= Data.Values['UserPassword'];
  SQLQuery.ParamByName('CEMail').AsString:=       Data.Values['CEMail'];
  SQLQuery.ParamByName('Title').AsString:=        Data.Values['Title'];
  SQLQuery.ParamByName('Memo').AsString:=         Data.Values['Memo'];
  SQLQuery.ParamByName('Tabs').AsBCD:=            StrToIntDef(Data.Values['Tabs'], 0);
  SQLQuery.ParamByName('FileName').AsString:=     Data.Values['FileName'];
  SQLQuery.ParamByName('FileSize').AsBCD:=        StrToIntDef(Data.Values['FileSize'], 0);
  SQLQuery.ParamByName('FileCode').AsBCD:=        StrToIntDef(Data.Values['FileCode'], 0);

  Try
    SQLQuery.ExecSQL;
  Except
    On E : EDatabaseError do
      Begin
       Response.Content:= StringReplace(E.Message, #13#10, '
', [rfReplaceAll]);
       Exit;
      End;
  End;

  Response.Content:='Ok';

end;


초보자 님이 쓰신 글 :
: 클라이언트가 서버로
: http://xxx.xxx.xxx.xxx/test.dll/command?a=aaa&b=bbb&c=ccc&d=ddd
: 이렇게 클라이언트가 넘겨주면
: 브라우져에 파라미터값이 쭉 뿌려지거든여...
: 브라우져화면은 넘어온 값은 aaa|bbb|ccc|ccc|ddd 이레 뿌려집니다..
: 이걸 바로 브라우져에 뿌리지 않고 바로 디비에 저장할려하거든여...
: test.DLL 을 고치나여?
: 디비는 디베이스 구여..로컬입니다.
: 디비는 테이블까지 다 만들어져 있습니다.
: 바로 해당 필드에 저장하게 하는방법이여... 어케 연동합니까?
: 어떤식으로 하면 되는지 상세히 아주 상세히 부탁드려요..
: 죄송합니다...
: 워낙 초보라서... 델파이 시작한지 5일됬음다..
:

+ -

관련 글 리스트
7480 ISAPI DLL을 디비에 저장하는방법 초보자 626 2001/10/12
7484     Re:ISAPI DLL을 디비에 저장하는방법 류종택 777 2001/10/15
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.