*-- Method Close() Local lnReturn If not This.nFTPSession = 0 then lnReturn = InternetCloseHandle(This.nFTPSession) This.nFTPSession = 0 EndIf If not This.nSession = 0 then lnReturn = InternetCloseHandle(This.nSession) This.nSession = 0 EndIf This.CleanUp()
*-- Method CleanUp() Clear Dlls "FtpDeleteFile", ; "FtpRenameFile", ; "InternetWriteFile", ; "FtpOpenFile", ; "FtpSetCurrentDirectory", ; "InternetConnect", ; "InternetCloseHandle", ; "InternetOpen" Return .T.Sarosh