AutoIt

SFTP Read Text File

See more SFTP Examples

Demonstrates how to open a text file on the SSH server and read text. AutoIt

Local $bSuccess = False

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

$oSftp = ObjCreate("Chilkat.SFtp")

;  Set some timeouts, in milliseconds:
$oSftp.ConnectTimeoutMs = 5000
$oSftp.IdleTimeoutMs = 15000

;  Connect to the SSH server.  
;  The standard SSH port = 22
;  The hostname may be a hostname or IP address.
Local $sHostname = "sftp.example.com"
Local $iPort = 22
$bSuccess = $oSftp.Connect($sHostname,$iPort)
If ($bSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  Authenticate with the SSH server.  Chilkat SFTP supports
;  both password-based authenication as well as public-key
;  authentication.  This example uses password authenication.
$bSuccess = $oSftp.AuthenticatePw("myLogin","myPassword")
If ($bSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  After authenticating, the SFTP subsystem must be initialized:
$bSuccess = $oSftp.InitializeSftp()
If ($bSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  Open a file for reading.
Local $sHandle
$sHandle = $oSftp.OpenFile("myTest.txt","readOnly","openExisting")
If ($oSftp.LastMethodSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  Assume the file we are reading contains the following text:
;  abcdefghijklmnopqrstuvwxyz1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ
;  (in ANSI format -- i.e. one byte per char).

;  Read 26 bytes:
Local $sText
$sText = $oSftp.ReadFileText($sHandle,26,"ansi")
If ($oSftp.LastMethodSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  Should print "abcdefghijklmnopqrstuvwxyz";
ConsoleWrite($sText & @CRLF)

;  Read the next 10 bytes.
$sText = $oSftp.ReadFileText($sHandle,10,"ansi")
If ($oSftp.LastMethodSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  Should print "1234567890";
ConsoleWrite($sText & @CRLF)

;  Read the next 26 bytes.
$sText = $oSftp.ReadFileText($sHandle,26,"ansi")
If ($oSftp.LastMethodSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

;  Should print "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
ConsoleWrite($sText & @CRLF)

;  Close the file.
$bSuccess = $oSftp.CloseHandle($sHandle)
If ($bSuccess <> True) Then
    ConsoleWrite($oSftp.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Success." & @CRLF)