Class: | FTP_SERVICE |
Type | Numeric |
Direction | Input |
LPARAMETERS lnConnectionID LOCAL fResult IF This.LoadAPIFuncs() != ERROR_SUCCESS RETURN .F. ENDIF IF TYPE("lnConnectionID") != "N" RETURN .F. ENDIF =This.BeforeDialHangUp(lnConnectionID) fResult = InternetHangUp(@lnConnectionID, 0) This.GetExtendedError() =This.AfterDialHangUp(lnConnectionID,fResult) RETURN fResult # 0