LPARAMETERS INP lcCommand,INP liFlags,OPT_INP liContext,OPT_CHNGREF lihFTP
LOCAL fResult
IF This.OpenFTPConnection(This.cCurrentDir) && Open an FTP Handle
liFlags=IIF(PCOUNT()<2,FTP_TRANSFER_TYPE_BINARY,liFlags)
liContext=IIF(PCOUNT()<3,0,liContext)
lihFTP=IIF(ISNULL(lihFTP),-1,0)
lcCommand = lcCommand + cNULL
fResult = FtpCommand(This.nConnect_Handle, IIF(lihFTP=-1,0,1), liFlags, @lcCommand,liContext,@lihFTP)
=IIF(This.lMultiOperations,.T.,This.CloseFTPConnection()) && Close FTP Handle
RETURN fResult = 1
ENDIF
RETURN .F.