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
(VB.NET) Download Text File into String VariableDownload a text file directly into a string variable.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim ftp As New Chilkat.Ftp2 ftp.Hostname = "ftp.someFtpServer.com" ftp.Username = "myFtpUserAccount" ftp.Password = "myFtpPassword" ' Set other possible settings... ' See http://www.cknotes.com/determining-ftp2-connection-settings/ ' for more information about FTP connection settings. ftp.Passive = True ftp.AuthTls = True ' Connect and login to the FTP server. Dim success As Boolean = ftp.Connect() If (success <> True) Then Debug.WriteLine(ftp.LastErrorText) Exit Sub End If ' Change to the remote directory where the existing file is located. success = ftp.ChangeRemoteDir("junk") If (success <> True) Then Debug.WriteLine(ftp.LastErrorText) Exit Sub End If ' Download the contents of the remote file into a string variable. ' The GetRemoteFileTextData method assumes the remote file contains ANSI chars. ' To download text files containing non-ANSI text, such as utf-8, call GetRemoteFileTextC ' instead. (see below) Dim fileContents As String = ftp.GetRemoteFileTextData("ansiText.txt") If (ftp.LastMethodSuccess <> True) Then Debug.WriteLine(ftp.LastErrorText) Exit Sub Else Debug.WriteLine(fileContents) End If ' To download a remote text file containing utf-8 chars, ' call GetRemoteFileTextC and pass "utf-8" for the 2nd arg. This tells ' Chilkat to interpret the incoming bytes according to the utf-8 character encoding. fileContents = ftp.GetRemoteFileTextC("utf8Text.txt","utf-8") If (ftp.LastMethodSuccess <> True) Then Debug.WriteLine(ftp.LastErrorText) Exit Sub Else Debug.WriteLine(fileContents) End If success = ftp.Disconnect() |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.