(DataFlex) Automatically Determine FTP Proxy Method

Tries each of the five possible ProxyMethod settings and returns the value (1-5) of the ProxyMethod that succeeded.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoFtp
    Integer iPMethod
    Boolean iSuccess

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    Get Create (RefClass(cComChilkatFtp2)) To hoFtp
    If (Not(IsComObjectCreated(hoFtp))) Begin
        Send CreateComObject of hoFtp
    End

    Set ComHostname Of hoFtp To "www.example-code.com"
    Set ComUsername Of hoFtp To "example-code.com"
    Set ComPassword Of hoFtp To "****"

    Set ComProxyHostname Of hoFtp To "ftp.myproxyhost.com"
    Set ComProxyPort Of hoFtp To 21
    // Note: Your FTP Proxy server may or may not require authentication.
    Set ComProxyUsername Of hoFtp To "myProxyUsername"
    Set ComProxyPassword Of hoFtp To "myProxyPassword"

    // The ProxyMethod should be an integer value between 1 and 5.
    // If you know your FTP proxy server's authentication scheme,
    // you may set it directly.  To determine the ProxyMethod,
    // call DetermineProxyMethod.  A return value of -1 indicates a failure.
    // A return value of 0 indicates that nothing worked.
    // A return value of 1-5 indicates the ProxyMethod that was 
    // successful, and this should be the value used for the ProxyMethod
    // property.

    Get ComDetermineProxyMethod Of hoFtp To iPMethod
    Showln iPMethod

    Get ComDisconnect Of hoFtp To iSuccess


End_Procedure