dll을 Unload하는 방법은 IIS의 기본 웹사이트의 등록정보에서 홈디렉토리탭에 가시면 언로드 버튼이 있습니다.



그리구 Request값이 제대로 넘어온다면 질의문의 fieldType이 다를 수 있겠지만 그건 아닌거 같구........기본적인 쿼리문을 미리 입력하셔서 active되는지 확인하시구 그것이 된다면 서버 설정이 잘못되었을 수도 있구요. 뭐라 한가지로 딱 꼬집어 말씀드릴 수가없네요.

중간에 Response.Content := IntToStr(ReadNumber); 는 값을 확인하려구 만드신 거겠지요? 제가 알기론 Response.Content 이후의 구문은 실행되지 않을텐데요.



혹시 2000을 사용하시면 화일에 IUSER_컴퓨터이름 의 사용권한이 없을 수도 있습니다.



코딩상의 문제는 제가 보기엔 없는것 같습니다.

물론 제가 못보고 넘어간게 있을수 있지만요.

도움이 못되드린거 같네요. 죄송~







문상철 wrote:

> 웹모듈에는 ADOQuery 하나만 있고 ADOConnection 은 사용하지 않았습니다.

> ADOConnection 을 사용하면 익스플로어가 멈추는 현상이 일어납니다.

>

> -------------------------------------------------------------------------------

> 테스트한내용>

> Idx := StrToInt(Trim(Request.QueryFields.Values['no']));

> 에서 idx 값은 제대로 전달 됩니다.

>

> Query를 오픈하기 전까지는 에러가 나질 않습니다.

> (일일이 주석을 달고 Response.Content를 사용해서 확인했습니다.)

> -----------------------------------------------------------------------------

> 질문내용> 왜 쿼리를 오픈할때 내부오류가 발생했다는 에러메세지가 익스플로러 에서

> 나옵니다. 이부분을 어떻게 처리해야 하는지..

>

> 또한 적재된 DLL 파일을 어떻게 메모리에서 내려야 하는지..

> IIS 중지 해서 삭제할려면 원본파일이 사용중인것 같다는 에러메세지가

> 나옵니다.

>

> 해결할 수만 있다면 소스를 전부 올리도록 하겠습니다.

> -----------------------------------------------------------------------------

> .

> .

> .

>

> str := str + '
> + ADOQuery1.FieldByName('Board_Idx').AsString + '>'

> + ADOQuery1.FieldByName('title').AsString + '';

> .

> .

> .

> //위의 내용은 게시판 리스트를 보는 부분인데 위에서 클릭을 하면

> // 아래의 WebActionItem2Action 을 들어가는 부분입니다.

> //

>

>

> //리스트 목록에서 자세한 데이타를 읽기.....

> // pathinfo 속성은 read 입니다.

>

> procedure TWebModule1.WebModule1WebActionItem2Action(Sender: TObject;

> Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);

> var

> str : string;

> idx,readNumber : Integer;

>

> begin

>

> Idx := StrToInt(Trim(Request.QueryFields.Values['no']));

>

>

> ADOQuery1.Close;

> ADOQuery1.SQL.Clear;

> ADOQuery1.SQL.Add('Select ReadNum dbmyboard ');

> ADOQuery1.SQL.Add('where board_idx = :N1' );

> ADOQuery1.Parameters.ParamValues['N1'] := Idx;

> ReadNumber := ADOQuery1.Fields[0].AsInteger;

>

> ADOQuery1.Open; //이부분에서 에러가 발생하는것 같음

>

> Response.Content := IntToStr(ReadNumber);

>

> //조회수를 1 증가 , ReadNum 은 조회수.....

> ADOQuery1.Close;

> ADOQuery1.SQL.Clear;

> ADOQuery1.SQL.Add('Update ReadNum = ReadNum + 1 dbmyboard ');

> ADOQuery1.SQL.Add('where board_idx = ' + idx );

>

> ADOQuery1.ExecSQL;

>

> //실제 데이타를 얻는 부분

> ADOQuery1.Close;

> ADOQuery1.SQL.Clear;

> ADOQuery1.SQL.Add('Select * dbmyboard ');

> ADOQuery1.SQL.Add('where board_idx = ' + idx );

>

> ADOQuery1.Open;

>

>

> //html 코드에 데이타를 출력하는 부분

> str := '';

> str := str + '';

> Str := str + '게시판 내용 보기';

>

> str := str + '';

>

> str := str + '';

> str := str + '';

>

> str := str + '';

> str := str + '';

>

> str := str + '';

> str := str + '';

>

> str := str + '';

> str := str + '';

>

> str := str + '

이메일	' + ADOQuery1.FieldByName('email').AsString + '
이름	' + ADOQuery1.FieldByName('name').AsString + '
제목	' + ADOQuery1.FieldByName('title').AsString + '
내용보기	' + ADOQuery1.FieldByName('content').AsString + '

';

> str := str + '

';

> str := str + '게시판으로 이동

';

> str := str + '';

>

> Response.Content := str;

>

> end;

>

>

>