ReadFilter

이 메서드는 날짜와 시간 범위 사이에 있는 로그 레코드를 읽을 수 있게 합니다.

구문

OIISLog.ReadFilter( [startDateTime], [endDateTime] )

매개 변수

startDateTime

시간과 날짜를 나타내는 선택적 매개 변수로 지정된 날짜와 시간 이후의 로그 레코드를 읽습니다.

endDateTime

시간과 날짜를 나타내는 선택적 매개 변수로 지정된 날짜와 시간 이전의 로그 레코드를 읽습니다.

중요

매개 변수가 선택 사항이어도 최소한 하나는 지정해야 합니다.

예제

다음은 W3C 확장 로그 파일 형식에서 로그 파일을 열고 지정 데이터 범위에 선택적 레코드 속성을 표시하는 예제입니다.

--- Log_ReadFilter.asp ---

<HTML>
<HEAD><TITLE></TITLE></HEAD>
<BODY>

<%
LogFile = Request.Form("logfile")
StartDate = Request.Form("startdt")
EndDate = Request.Form("enddt")
%>

<H3>Display a Range of Log Records by Date</H3>

<FORM NAME="getlogfilename" METHOD="POST" ACTION="Log_ReadFilter.asp">
Please enter the full path name of a log file to read in %SystemRoot%\system32\LogFiles\*SVC*\*.log:<BR>
<input type="TEXT" NAME="logfile"  size=70 value=<%=LogFile%>><BR><BR>
Start DateTime:
<input type="TEXT" NAME="startdt" value=<%=StartDate%>> (Optional)<BR>
End DateTime: 
<input type="TEXT" NAME="enddt" value=<%=EndDate%>> (Optional)<BR>
(Use the format 'MM/DD/YYYY HH:MM:SS AM/PM')<BR><BR>
<INPUT TYPE="SUBMIT" VALUE="Submit">
</FORM>

<%
''''''''''''''''''''
'  Log file formats:
'  "NCSA Common Log File Format"
'  "Microsoft IIS Log File Format"
'  "W3C Extended Log File Format"
'''''''''''''''''''''

Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")

If (fsoObject.FileExists(LogFile)) Then

  Set oRead = CreateObject ("MSWC.IISLog")
  oRead.OpenLogFile LogFile, 1, "W3SVC", 1, "W3C Extended Log File Format"

  If Not (StartDate = "" Or EndDate = "") Then
    oRead.ReadFilter StartDate,EndDate
  End If 

  oRead.ReadLogRecord
%>
<TABLE Border=1>
<TR><TD>
<B>Date/Time</TD><TD><B>Client IP</TD><TD><B>User Name</TD><TD><B>URL Requested
</B></TD></TR>
<%
  Do While Not oRead.AtEndOfLog
    Response.Write "<TR><TD>&nbsp;" & oRead.DateTime & "</TD>"
    Response.Write "<TD>&nbsp;" & oRead.ClientIP & "</TD>"
    Response.Write "<TD>&nbsp;" & oRead.UserName & "</TD>"
    Response.Write "<TD>&nbsp;" & oRead.URIStem & "</TD></TR>"
    oRead.ReadLogRecord
  Loop
%>
</TABLE>
<%
  oRead.CloseLogFiles 1

ElseIf Not (LogFile = "") Then

  Response.Write "ERROR: " & LogFile & " does not exist."

End If

%>

</BODY>
</HTML>

© 1997-2001 Microsoft Corporation. All rights reserved.