HTTP Session Logging

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

Download Chilkat HTTP ActiveX

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)

set http = CreateObject("Chilkat.Http")

'  Any string unlocks the component for the 1st 30-days.
success = http.UnlockComponent("Anything for 30-day trial")
If (success <> 1) Then
    outFile.WriteLine(http.LastErrorText)
    WScript.Quit
End If

'  Set the SessionLogFilename property so that the Chilkat HTTP component
'  logs the exact HTTP requests and responses to a log 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 (html = vbNullString ) Then
    outFile.WriteLine(http.LastErrorText)
    WScript.Quit
End If

'  Here are 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
User-Agent: Chilkat/1.0.0 (+http://www.chilkatsoft.com/ChilkatHttpUA.asp)
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

Mail Component · XML Parser