Lianja

Download Text File into String Variable

See more FTP Examples

Download a text file directly into a string variable. Lianja

llSuccess = .F.

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

loFtp = createobject("CkFtp2")

loFtp.Hostname = "ftp.someFtpServer.com"
loFtp.Username = "myFtpUserAccount"
loFtp.Password = "myFtpPassword"

// Set other possible settings...
// See http://www.cknotes.com/determining-ftp2-connection-settings/ 
// for more information about FTP connection settings.
loFtp.Passive = .T.
loFtp.AuthTls = .T.

// Connect and login to the FTP server.
llSuccess = loFtp.Connect()
if (llSuccess <> .T.) then
    ? loFtp.LastErrorText
    release loFtp
    return
endif

// Change to the remote directory where the existing file is located.
llSuccess = loFtp.ChangeRemoteDir("junk")
if (llSuccess <> .T.) then
    ? loFtp.LastErrorText
    release loFtp
    return
endif

// 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)
lcFileContents = loFtp.GetRemoteFileTextData("ansiText.txt")
if (loFtp.LastMethodSuccess <> .T.) then
    ? loFtp.LastErrorText
    release loFtp
    return
else
    ? lcFileContents
endif

// 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.

lcFileContents = loFtp.GetRemoteFileTextC("utf8Text.txt","utf-8")
if (loFtp.LastMethodSuccess <> .T.) then
    ? loFtp.LastErrorText
    release loFtp
    return
else
    ? lcFileContents
endif

llSuccess = loFtp.Disconnect()


release loFtp