158 lines
5.1 KiB
HTML
158 lines
5.1 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
|
|
<HTML>
|
|
<HEAD>
|
|
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=Windows-1252">
|
|
<TITLE>ReadFilter</TITLE>
|
|
<SCRIPT LANGUAGE="JavaScript">
|
|
<!--
|
|
TempString = navigator.appVersion
|
|
if (navigator.appName == "Microsoft Internet Explorer"){
|
|
// Check to see if browser is Microsoft
|
|
if (TempString.indexOf ("4.") >= 0){
|
|
// Check to see if it is IE 4
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/coua.css">');
|
|
}
|
|
else {
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/cocss.css">');
|
|
}
|
|
}
|
|
else if (navigator.appName == "Netscape") {
|
|
// Check to see if browser is Netscape
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/coua.css">');
|
|
}
|
|
else
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/cocss.css">');
|
|
//-->
|
|
</script>
|
|
<SCRIPT LANGUAGE="VBScript">
|
|
<!--
|
|
Sub Window_OnLoad()
|
|
Dim frmContents
|
|
On Error Resume Next
|
|
If Not Parent Is Nothing Then
|
|
Set frmContents = Parent.Contents
|
|
If Not frmContents Is Nothing Then
|
|
frmContents.Window.TOCSynch_Click
|
|
End If
|
|
End If
|
|
End Sub
|
|
//--></SCRIPT><META NAME="DESCRIPTION" CONTENT="Internet Information Services reference information">
|
|
<META HTTP-EQUIV="PICS-Label" CONTENT='(PICS-1.1 "<http://www.rsac.org/ratingsv01.html>" l comment "RSACi North America Server" by "inet@microsoft.com <mailto:inet@microsoft.com>" r (n 0 s 0 v 0 l 0))'>
|
|
<META NAME="MS.LOCALE" CONTENT="EN-US">
|
|
<META NAME="MS-IT-LOC" Content="Internet Information Services">
|
|
</HEAD>
|
|
|
|
<BODY BGCOLOR="#FFFFFF" TEXT="#000000">
|
|
|
|
<H3><A NAME="_readfilter"></A><SUP></SUP>ReadFilter</H3>
|
|
|
|
<P>This method allows you to read log records between a date and time range.</P>
|
|
|
|
<H6>Syntax</H6>
|
|
|
|
<P><I>OIISLog</I><B>.ReadFilter(</B> [<I>startDateTime</I>], [<I>endDateTime</I>] <B>)</B></P>
|
|
|
|
<P><B> </B></P>
|
|
|
|
<H6>Parameters</H6>
|
|
|
|
<DL>
|
|
<DT><I>startDateTime</I></DT>
|
|
|
|
<DD>Optional parameter indicating date and time after which log records are to be read.<BR>
|
|
</DD>
|
|
|
|
<DT><I>endDateTime</I></DT>
|
|
|
|
<DD>Optional parameter indicating date and time before which log records are to be read.<BR>
|
|
</DD>
|
|
|
|
<DT></DT>
|
|
</DL>
|
|
|
|
<P><span class=le><B>Important</B></span></P>
|
|
|
|
<P>Although the parameters are optional, at least one must be specified.</P>
|
|
|
|
<H6>Example</H6>
|
|
|
|
<P>The following example opens a log file in the <B>W3C Extended Log File Format</B>, and displays selective properties of the records in the specified date range.</P>
|
|
|
|
<P>--- Log_ReadFilter.asp ---</P>
|
|
|
|
<PRE><CODE><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></CODE></PRE>
|
|
<hr class="iis" size="1">
|
|
<p align="center"><em><a href="../../../common/colegal.htm">© 1997-2001 Microsoft Corporation. All rights reserved.</a></em></p>
|
|
</BODY>
|
|
</HTML>
|