This function can only delete files off of the FTP Server that are not read only or some how protected by the server.
Parameter
-
lcRemoteFile
-
Remote file name
Type |
Character |
Direction |
Input |
Name and Path of the File to delete on the FTP Server.
Returns .T.
if the function successfully deleted the file from the FTP Server.
Returns .F.
if the function could not delete the file.
Source Code
LPARAMETERS lcRemoteFile
LOCAL fResult
IF This.OpenFTPConnection(This.cStartupFolder) && Open an FTP Handle
lcRemoteFile = lcRemoteFile + cNULL
=This.BeforeDeleteFTPFile(lcRemoteFile)
fResult = FtpDeleteFile(This.nConnect_Handle, @lcRemoteFile)
This.GetExtendedError()
=This.AfterDeleteFTPFile(lcRemoteFile,fResult)
=IIF(This.lMultiOperations,.T.,This.CloseFTPConnection()) && Close FTP Handle
RETURN fResult = 1
ENDIF
RETURN .F.