|
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 Keyboard AuthenticationDemonstrates how to implement keyboard authentication with an SSH server.
<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") ' Set some timeouts, in milliseconds: ssh.ConnectTimeoutMs = 5000 ssh.IdleTimeoutMs = 15000 ' Connect to the SSH server. ' The standard SSH port = 22 ' The hostname may be a hostname or IP address. hostname = "sftp.example.com" port = 22 success = ssh.Connect(hostname,port) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If ' Begin keyboard authentication.. xmlResponse = ssh.StartKeyboardAuth("myLogin") If (ssh.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If ' If a user authentication banner was received, then your app ' may display it prior to prompting for the password. Response.Write "<pre>" & Server.HTMLEncode( "UserAuthBanner: " & ssh.UserAuthBanner) & "</pre>" ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xml = Server.CreateObject("Chilkat.Xml") success = xml.LoadXml(xmlResponse) ' Assume LoadXml succeeds for the example.. If (xml.HasChildWithTag("success") = 1) Then Response.Write "<pre>" & Server.HTMLEncode( "No password required, already authenticated.") & "</pre>" Response.End End If If (xml.HasChildWithTag("error") = 1) Then Response.Write "<pre>" & Server.HTMLEncode( "Authentication already failed.") & "</pre>" Response.End End If ' See the online reference documentation for Chilkat SSH. ' The XML returned by StartKeyboardAuth will contain an infoRequest ' with one or more prompts that your application may choose to display. ' Call ContinueKeyboardAuth, passing in the whatever information is requires (such as the password). ' Typically, keyboard authentication requires one call to ContinueKeyboardAuth ' using the password. Theoretically, the SSH server could prompt for additional pieces ' of information. The authentication is completed when the XML returned contains ' either a "success" or "error" child node. ' This example asumes only one call to ContinueKeyboardAuth is required. xmlResponse = ssh.ContinueKeyboardAuth("myPassword") If (ssh.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>" Response.End End If success = xml.LoadXml(xmlResponse) ' Assume LoadXml succeeds for the example.. If (xml.HasChildWithTag("success") = 1) Then Response.Write "<pre>" & Server.HTMLEncode( "SSH Keyboard Authentication Successful!") & "</pre>" Response.End End If If (xml.HasChildWithTag("error") = 1) Then Response.Write "<pre>" & Server.HTMLEncode( "Authentication failed.") & "</pre>" Response.End End If %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.