VB.NET
VB.NET
SSH Execute Remote Commands
See more SSH Examples
Shows how to execute a command on an SSH server and retrieve the command output.Chilkat VB.NET Downloads
Dim success As Boolean = False
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim ssh As New Chilkat.Ssh
Dim port As Integer = 22
success = ssh.Connect("the-ssh-server.com",port)
If (success <> True) Then
Debug.WriteLine(ssh.LastErrorText)
Exit Sub
End If
' Authenticate using login/password:
success = ssh.AuthenticatePw("theSshLogin","theSshPassword")
If (success <> True) Then
Debug.WriteLine(ssh.LastErrorText)
Exit Sub
End If
' Send some commands and get the output.
Dim strOutput As String = ssh.QuickCommand("df","ansi")
If (ssh.LastMethodSuccess <> True) Then
Debug.WriteLine(ssh.LastErrorText)
Exit Sub
End If
Debug.WriteLine("---- df ----")
Debug.WriteLine(strOutput)
strOutput = ssh.QuickCommand("echo hello world","ansi")
If (ssh.LastMethodSuccess <> True) Then
Debug.WriteLine(ssh.LastErrorText)
Exit Sub
End If
Debug.WriteLine("---- echo hello world ----")
Debug.WriteLine(strOutput)
strOutput = ssh.QuickCommand("date","ansi")
If (ssh.LastMethodSuccess <> True) Then
Debug.WriteLine(ssh.LastErrorText)
Exit Sub
End If
Debug.WriteLine("---- date ----")
Debug.WriteLine(strOutput)
' --------------
' Sample output:
' ---- df ----
' Filesystem 512-blocks Used Available Capacity iused ifree %iused Mounted on
' /dev/disk2 2176716032 265736304 1910467728 13% 33281036 238808466 12% /
' devfs 382 382 0 100% 662 0 100% /dev
' map -hosts 0 0 0 100% 0 0 100% /net
' map auto_home 0 0 0 100% 0 0 100% /home
' /dev/disk3s2 374668 374668 0 100% 93665 0 100% /Volumes/Google Chrome
'
' ---- echo hello world ----
' hello world
'
' ---- date ----
' Thu Dec 22 17:19:32 CST 2016