(VBScript) SSH using HTTP Proxy

Note: This example requires Chilkat v9.5.0.51 or greater.

Demonstrates how to connect to an SSH server through an HTTP proxy. (Connects through a generic proxy of type: HTTP/1.1 using the CONNECT method.)

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.Ssh")
set ssh = CreateObject("Chilkat.Ssh")

' To connect through an HTTP proxy, set the HttpProxyHostname
' and HttpProxyPort properties to the hostname (or IP address)
' and port of the HTTP proxy.  Typical port numbers used by
' HTTP proxy servers are 3128 and 8080.
ssh.HttpProxyHostname = "www.my-http-proxy.com"
ssh.HttpProxyPort = 3128

' Important:  Your HTTP proxy server must allow non-HTTP
' traffic to pass.  Otherwise this does not work.

' Connect to an SSH server via an HTTP proxy:

' Hostname may be an IP address or hostname:
hostname = "192.168.1.108"
port = 22

success = ssh.Connect(hostname,port)
If (success <> 1) Then
    outFile.WriteLine(ssh.LastErrorText)
    WScript.Quit
End If

' Your application is now connected to an SSH server 
' through an HTTP proxy. 
' ..

outFile.Close