HTTPS GET - Download HTML from HTTPS URL

Simple HTTPS GET request to download the HTML of a web page.

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
    MsgBox http.LastErrorText
    WScript.Quit
End If

'  Send the HTTP GET and return the content in a string.

html = http.QuickGetStr("https://www.paypal.com/")

outFile.WriteLine(html)
outFile.Close