Logging Utility

원본 : 뉴스그룹 작성자 : 쎄미님

안녕하세요.

질문하고는 좀 덜 떨어지..(?) 지만..ㅡ.ㅡ;;;; 쿨럭..

^^;;  재밌는 컴포넌트 하나 알려드리죠 ^^

빨간책 ASP Professional 3.0 에 있는 컴포넌트 소개 부분에 나오는 거랍니다. ^^
저는 이걸 이용해서 아주 재밌게 잘 사용하고 있습니다 .^^ (큰 용량은
사용안해봐서리 - -;; 작은 곳에서만)

이름은 Logging Utility 인데요

IIS Log를 분류 할 수 있는 컴포넌트 이더군요 ^^;;
자세한건 빨간책에서 보시구요 ㅡ.ㅡ 저는 대략 설명만 ㅡ.ㅡa

###############################################
' 상수를 사용하고 싶으면 메타 데이터를 삽입
' 컴포넌트에 의해 제공되는 ForReading, ForWriting, 또는 AllOpenFiles 같은
상수
<!-- METADATA TYPE="typelib"
FILE="C:\WINNT\system32\inetsrv\logscrpt.dll" -->

'인스턴스 생성
SET objLogUtil = Server.CreateObject("MSWC.IISLog")

'W3SVC 인스턴스 번호 1에 대한 로그 파일을 열어 파일을 읽는다.
objLogUtil.OpenLogFile "extend#.log", ForReading, "W3SVC", 1

'마지막 날의 레코드에 대해서만 필터를 설정한다.
objLogUtil.ReadFilter DateAdd("d", -1, now), now

'레코드들을 반복 검색한다.
Do while Not objLogUtil.AtEndOfLog
    objLogUtil.ReadLogRecord  ' 다음 레코드를 읽는다.
    Response.Write "페이지에 대해 받은 요청 " & objLogUtil.URLStem &" on " _
                            & objLogUtil.DaeTime &" From IP address " _
                            & objLogUtil.ClientIP &".<BR>"
Loop

objLogUtil.CloseLogFiles(ForReading) '파일들을 닫는다.

#################################################


아는건

<%= objLogUtil.DateTime %>
<%= objLogUtil.ClientIP %>
<%= objLogUtil.BytesSent %>
<%= objLogUtil.URLStem %>

같이 ~~~~~~~~~~~~~~~~~~