Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Classic ASP) SSH Commands to Cisco SwitchDemonstrates how to establish an SSH session with a Cisco switch (or something similar) and send commands in a device console session.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' 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 = Server.CreateObject("Chilkat.Ssh") success = ssh.Connect("172.16.16.100",22) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If ' Authenticate using login/password: success = ssh.AuthenticatePw("myLogin","myPassword") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If ' Start a shell session. channelNum = ssh.QuickShell() If (channelNum < 0) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If ' If the CISCO switch returns a prompt with "#", then read until we get the prompt. ' (It's not actually required that we do this, but it helps to know that all is OK at this point..) success = ssh.ChannelReceiveUntilMatch(channelNum,"#","utf-8",1) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If ' Show what we received so far: Response.Write "<pre>" & Server.HTMLEncode( ssh.GetReceivedText(channelNum,"utf-8")) & "</pre>" ' Send a "show clock" command. success = ssh.ChannelSendString(channelNum,"show clock" & vbLf,"utf-8") ' Read the output to the next interactive prompt. success = ssh.ChannelReceiveUntilMatch(channelNum,"#","utf-8",1) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( ssh.GetReceivedText(channelNum,"utf-8")) & "</pre>" ' Send another command and get the output, and so on... success = ssh.ChannelSendString(channelNum,"some other command" & vbLf,"utf-8") success = ssh.ChannelReceiveUntilMatch(channelNum,"#","utf-8",1) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( ssh.GetReceivedText(channelNum,"utf-8")) & "</pre>" ssh.Disconnect %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.