(VBScript) HTTP Session Logging

Demonstrates how to use the SessionLogFilename property to log HTTP requests and responses to a file.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = CreateObject("Chilkat.Http")

' Set the SessionLogFilename property so that the Chilkat HTTP component
' logs the exact HTTP requests and responses to a file.

' The SessionLogFilename may be used with any of the HTTP
' methods for sending GET, POST, PUT, DELETE, HEAD, etc.
http.SessionLogFilename = "c:/temp/httpSessionLog.txt"

' Try a simple HTTP GET and then examine the session log:
html = http.QuickGetStr("http://www.chilkatsoft.com/httpTest/abc.html")
If (http.LastMethodSuccess <> 1) Then
    outFile.WriteLine(http.LastErrorText)
    WScript.Quit
End If

' The contents of the session log file after doing 
' the GET request:

' 	---- Sending ----
' 	GET /httpTest/abc.html HTTP/1.1
' 	Accept: */*
' 	Accept-Encoding: gzip
' 	Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7
' 	Accept-Language: en-us,en;q=0.5
' 	Host: www.chilkatsoft.com
' 	Connection: Keep-Alive
' 
' 
' 	---- Received ----
' 	HTTP/1.1 200 OK
' 	Content-Length: 37
' 	Content-Type: text/html
' 	Last-Modified: Wed, 09 Dec 2009 14:55:08 GMT
' 	Accept-Ranges: bytes
' 	ETag: "4eecd499df78ca1:28b"
' 	Server: Microsoft-IIS/6.0
' 	X-Powered-By: ASP.NET
' 	Date: Wed, 09 Dec 2009 15:15:50 GMT
' 
' 	<html>
' 	<body>
' 	ABC
' 	</body>
' 	</html>
' 

outFile.Close