Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
File Existence CheckTesting to see if a file exists on the FTP server. The GetSizeByName method is a convenient way to check if a file exists. It will return -1 if the file does not exist, otherwise it returns the size of the file in bytes. 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.***.com' EXEC sp_OASetProperty @ftp, 'Username', '***' EXEC sp_OASetProperty @ftp, 'Password', '***' -- 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 -- Set the current remote directory to where the file is located: EXEC sp_OAMethod @ftp, 'ChangeRemoteDir', @success OUT, '/something' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @ftp, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- Test to see if the file exists by getting the file size by name. -- If a -1 is returned, the file does not exist. DECLARE @fileSize int EXEC sp_OAMethod @ftp, 'GetSizeByName', @fileSize OUT, 'test123.txt' IF @fileSize < 0 BEGIN PRINT 'file does not exist' END ELSE BEGIN PRINT 'file exists and is ' + STR(@fileSize) + ' bytes in size' END EXEC sp_OAMethod @ftp, 'Disconnect', NULL END GO |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.