AutoIt

FTP Upload / Download to StringBuilder

Demonstrate how to upload from a Chilkat StringBuilder object, and download into a StringBuilder object. AutoIt

Local $bSuccess = False

; This example assumes Chilkat Ftp2 to have been previously unlocked.
; See Unlock Ftp2 for sample code.

$oFtp = ObjCreate("Chilkat.Ftp2")

$oFtp.Hostname = "www.my-ftp-server.com"
$oFtp.Username = "mFtpLogin"
$oFtp.Password = "myFtpPassword"

; Connect to the FTP server.
$bSuccess = $oFtp.ConnectOnly()
If ($bSuccess <> True) Then
    ConsoleWrite($oFtp.LastErrorText & @CRLF)
    Exit
EndIf

; Authenticate with the FTP server.
$bSuccess = $oFtp.LoginAfterConnectOnly()
If ($bSuccess <> True) Then
    ConsoleWrite($oFtp.LastErrorText & @CRLF)
    Exit
EndIf

$oSbA = ObjCreate("Chilkat.StringBuilder")
$oSbA.LoadFile("qa_data/hamlet.xml","utf-8")

; Upload the contents of sbA to the FTP server.
Local $bIncludeBOM = False
Local $sRemoteFilename = "hamletFromSb.xml"
$bSuccess = $oFtp.PutFileSb($oSbA,"utf-8",$bIncludeBOM,$sRemoteFilename)
If ($bSuccess <> True) Then
    ConsoleWrite($oFtp.LastErrorText & @CRLF)
    Exit
EndIf

; Download...
$oSbB = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oFtp.GetFileSb($sRemoteFilename,"utf-8",$oSbB)
If ($bSuccess <> True) Then
    ConsoleWrite($oFtp.LastErrorText & @CRLF)
    Exit
EndIf

; Verify that sbA and sbB have the exact same contents.
ConsoleWrite("size of sbA: " & $oSbA.Length & @CRLF)
Local $bCaseSensitive = True
If ($oSbA.ContentsEqualSb($oSbB,$bCaseSensitive) = True) Then
    ConsoleWrite("Contents are equal. Success." & @CRLF)
Else
    ConsoleWrite("Contents are NOT equal.  Failed." & @CRLF)
EndIf

$oFtp.Disconnect()