VBScript

Get SSH Server Authentication Methods

See more SSH Examples

Demonstrates how to get the authentication methods of an SSH server.

This example requires Chilkat v9.5.0.78 or greater.

VBScript

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

success = 0

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

set ssh = CreateObject("Chilkat.Ssh")

' To get the authentication methods offered by an SSH server, we first connect.
success = ssh.Connect("example.com",22)
If (success <> 1) Then
    outFile.WriteLine(ssh.LastErrorText)
    WScript.Quit
End If

' Next, we call GetAuthMethods to receive a comma separated list of authentication methods
authMethods = ssh.GetAuthMethods()
If (ssh.LastMethodSuccess <> 1) Then
    outFile.WriteLine(ssh.LastErrorText)
    WScript.Quit
End If

' For example: publickey,password,keyboard-interactive
outFile.WriteLine("Authentication methods suported by this serve: " & authMethods)

' IMPORTANT:
' Getting the authentication methods will intentionally disconnect from the server.
' We'll need to re-connect, etc. to continue..

' For example..
success = ssh.Connect("example.com",22)
If (success <> 1) Then
    outFile.WriteLine(ssh.LastErrorText)
    WScript.Quit
End If

success = ssh.AuthenticatePw("myLogin","myPassword")
If (success <> 1) Then
    outFile.WriteLine(ssh.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine("SSH Authentication successful.")

' ...

ssh.Disconnect 

outFile.Close