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
(Xojo Plugin) FTP Download Binary File to a StreamDemonstrates how to FTP download a binary file to a Chilkat stream. Note: This example requires Chilkat v9.5.0.67 or greater.
// This example assumes the Chilkat FTP2 API to have been previously unlocked. // See FTP2 Unlock Sample for sample code. Dim ftp As New Chilkat.Ftp2 ftp.Hostname = "www.my-ftp-server.com" ftp.Username = "mFtpLogin" ftp.Password = "myFtpPassword" ftp.AuthTls = True ftp.Passive = True // Connect and login to the FTP server using TLS. Dim success As Boolean success = ftp.Connect() If (success <> True) Then System.DebugLog(ftp.LastErrorText) Return End If // We'll read the incoming data chunk-by-chunk and write to an output file. Dim fac As New Chilkat.FileAccess success = fac.OpenForWrite("qa_output/penguins2.jpg") If (success <> True) Then System.DebugLog(fac.LastErrorText) Return End If Dim streamObj As New Chilkat.Stream // Create a task to do the FTP download. Dim t As Chilkat.Task t = ftp.GetFileToStreamAsync("penguins2.jpg",streamObj) If (ftp.LastMethodSuccess <> True) Then System.DebugLog(ftp.LastErrorText) Return End If // Start the task in a background thread. success = t.Run() Dim bd As New Chilkat.BinData While streamObj.EndOfStream <> True // Get the next chunk of JPG bytes. success = streamObj.ReadBd(bd) // Do something with it.. // In this simple example, we'll just write to the file. success = fac.FileWriteBd(bd,0,0) // Clear for the next read. success = bd.Clear() Wend fac.FileClose System.DebugLog("Success.") |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.