OpenLogFile

이 메서드는 IISLog 개체를 사용하여 읽거나 쓰기 위해 로그 파일을 열 수 있게 합니다.

구문

OIISLog.OpenLogFile( FileName, IOMode, ServiceName, ServiceInstance, OutputLogFileFormat )

매개 변수

FileName

열려는 로그 파일 이름입니다.

IOMode

읽거나 쓰기 위해 로그 파일이 열리는지 여부를 나타내는 매개 변수입니다. 이 매개 변수는 다음 값들 중 하나가 될 수 있습니다.

ServiceName

로깅 모듈이 이 서비스와 일치하는 레코드만 반환해야 함을 나타내는 매개 변수입니다.

ServiceInstance

로깅 모듈이 이 서버 인스턴스와 일치하는 레코드만 반환해야 함을 나타내는 매개 변수입니다.

OutputLogFileFormat

쓰기 위해 열린 로그 파일의 형식을 나타내는 매개 변수입니다.

중요

이 매개 변수 중 선택적 매개 변수는 하나도 없습니다.

예제

다음은 W3C 확장 로그 파일 형식에 있는 로그 파일을 열고 이 로그 파일의 내용을 NCSA 일반 로그 파일 형식에 있는 다른 로그 파일에 쓰는 예제입니다.

--- Log_OpenFile.asp ---

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

<%
LogFile = Request.Form("logfile")
Output = Request.Form("output")
%>

<H3>Convert From W3C Extended Log Format to NCSA Common Log Format</H3>

<FORM NAME="getlogfilename" METHOD="POST" ACTION="Log_OpenFile.asp">
Please enter the full path name of a log file to read in %SystemRoot%\system32\LogFiles\*SVC*:<BR>
<input type="TEXT" NAME="logfile" size=70 value=<%=LogFile%>><BR>
Enter the full path name of a log file to write to:<BR>
<input type="TEXT" NAME="output" size=70 value=<%=Output%>><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")
  Set oWrite = CreateObject ("MSWC.IISLog") 
  oRead.OpenLogFile LogFile, 1, "W3SVC", 1, "W3C Extended Log File Format"
  oWrite.OpenLogFile Output, 2, "W3SVC", 1, "NCSA Common Log File Format" 
  oRead.ReadLogRecord

  Do While Not oRead.AtEndOfLog
    oWrite.WriteLogRecord oRead
    oRead.ReadLogRecord
  Loop

  oRead.CloseLogFiles 1
  oWrite.CloseLogFiles 2
  Response.Write "File " & LogFile & "<BR>has been written to " & Output & "<BR>"

ElseIf Not (LogFile = "") Then

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

End If

%>

</BODY>
</HTML>

© 1997-2001 Microsoft Corporation. All rights reserved.