Xbase++

chmod (Setting File Permissions)

See more FTP Examples

This example assumes your FTP server supports the "chmod" command, which typically means it must be a server running on a Linux or Unix system. The SendCommand method may be called to send arbitrary commands to the FTP server. This example sends a "chmod" command to set the file permissions. Xbase++

LOCAL nSuccess
LOCAL oFtp
LOCAL cResp

nSuccess := 0

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

oFtp := CreateObject("Chilkat.Ftp2")

oFtp:Hostname := "ftp.cknotes.com"
oFtp:Username := "myLogin"
oFtp:Password := "myPassword"

//  Connect and login to the FTP server.
nSuccess := oFtp:Connect()
IF (nSuccess != 1)
    ? oFtp:LastErrorText
    oFtp:destroy()
    RETURN
ENDIF

//  Send a chmod command to the FTP server to set
//  the permissions of a file to 0644:
cResp := oFtp:SendCommand("chmod 0644 hamlet.xml")

IF (oFtp:LastMethodSuccess != 1)
    //  Failed.
    ? oFtp:LastErrorText
ELSE
    //  You should write code to examine the response to
    //  the SendCommand.  As an example, the FTP server
    //  used for testing responds with this for success:
    //  200 Permissions changed on hamlet.xml
    ? cResp
ENDIF

nSuccess := oFtp:Disconnect()

oFtp:destroy()