Tcl
Tcl
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.Chilkat Tcl Downloads
load ./chilkat.dll
set success 0
# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
set ftp [new_CkFtp2]
CkFtp2_put_Hostname $ftp "ftp.cknotes.com"
CkFtp2_put_Username $ftp "myLogin"
CkFtp2_put_Password $ftp "myPassword"
# Connect and login to the FTP server.
set success [CkFtp2_Connect $ftp]
if {$success != 1} then {
puts [CkFtp2_lastErrorText $ftp]
delete_CkFtp2 $ftp
exit
}
# Send a chmod command to the FTP server to set
# the permissions of a file to 0644:
set resp [CkFtp2_sendCommand $ftp "chmod 0644 hamlet.xml"]
if {[CkFtp2_get_LastMethodSuccess $ftp] != 1} then {
# Failed.
puts [CkFtp2_lastErrorText $ftp]
} 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
puts "$resp"
}
set success [CkFtp2_Disconnect $ftp]
delete_CkFtp2 $ftp