Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
|
chmod (Setting File Permissions)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.
CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @sTmp0 nvarchar(4000) DECLARE @ftp int EXEC @hr = sp_OACreate 'Chilkat.Ftp2', @ftp OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END DECLARE @success int -- Any string unlocks the component for the 1st 30-days. EXEC sp_OAMethod @ftp, 'UnlockComponent', @success OUT, 'Anything for 30-day trial' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @ftp, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END EXEC sp_OASetProperty @ftp, 'Hostname', 'ftp.cknotes.com' EXEC sp_OASetProperty @ftp, 'Username', 'myLogin' EXEC sp_OASetProperty @ftp, 'Password', 'myPassword' -- Connect and login to the FTP server. EXEC sp_OAMethod @ftp, 'Connect', @success OUT IF @success <> 1 BEGIN EXEC sp_OAGetProperty @ftp, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- Send a chmod command to the FTP server to set -- the permissions of a file to 0644: DECLARE @response nvarchar(4000) EXEC sp_OAMethod @ftp, 'SendCommand', @response OUT, 'chmod 0644 hamlet.xml' IF @response Is NULL BEGIN -- Failed. EXEC sp_OAGetProperty @ftp, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 END ELSE BEGIN -- 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 PRINT @response END EXEC sp_OAMethod @ftp, 'Disconnect', NULL END GO |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.