FiveTech Software tech support forums

... do FTP processes. It works perfectly. I am using the .dll WININET and calling the functions: INTERNETOPEN INETCLOSEHANDLE FTPGETFILE FTPPUTFILE INTERNETCONNECT However, when I build using Harbour / MSVC / FWH, it appears to not recognize the WININET.dll because it gives me unidentified externals ...

Félix, Finalmente he encontrado la solucion al problema. El getlasterror() de la llamada a InternetConnect() me marcaba 12603. Con ese numero llegué a http://www.prestosoft.com/fvc_faq.asp#5 y esta buena gente ya lo explica todo: Apagar en internet explorer ...

... default cMask := "*.*" hInternet = INTERNETOPEN( "Anystring", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) hConnect = INTERNETCONNECT( hInternet, cIP, INTERNET_INVALID_PORT_NUMBER, cUser, cPass, INTERNET_SERVICE_FTP, 0, 0 ) if hConnect != nil clastFileinDir:=FTPLASTFILEINDIR(hConnect, ...

Lucas, These functions are duplicated in ftp.prg or ftp.c. There is no ftp.* in FWH neither in Harbour, unless I miss something: fiveh32.lib(WININET.obj) : warning LNK4006: _HB_FUN_INTERNETOPEN ya se definió en ftp.obj; segunda definición omitida fiveh32.lib(WININET.obj) : warning LNK4006: _HB_FUN_I...

... carpeta del servidor FTP Estoy haciendo esto: hInternet :=INTERNETOPEN( "CualquierCosa", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) hConnect :=INTERNETCONNECT( hInternet, cFTP_url, INTERNET_INVALID_PORT_NUMBER, cFTP_Usr, cFTP_Clv, INTERNET_SERVICE_FTP, 0, 0 ) lFTPError :=.f. do while ( .not. ...

... hWinINet < 0 .or. hWinINet >= 32 hInternet := InternetOpen( "Valdenebro", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) endif hConnect := INTERNETCONNECT( hInternet, cFtpAddress, nPort, cUser, cPass, nService, 0, 0 ) IF hconnect == 0 ALERT ("ERROR EN CONEXION.",,"Descarga","X",,.t.) ...

... < 0 .or. hWinINet >= 32       hInternet := InternetOpen( "ftp", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 )    endif    hConnect := INTERNETCONNECT( hInternet, cFtpAddress, 21, cUser, cPass, 1, 0, 0 )    IF hconnect == 0       alert ("ERROR EN CONEXION.")    ELSE       ...

... 443 // " " HTTPS " #define INTERNET_DEFAULT_SOCKS_PORT 1080 // default for SOCKS firewall servers. // // service types for InternetConnect() // #define INTERNET_SERVICE_FTP 1 #define INTERNET_SERVICE_GOPHER 2 #define INTERNET_SERVICE_HTTP 3 // // flags for FTP // #define ...

... En ambos casos, antes de realizar una petición (request), se realizan dos pasos obligatorios: 1) InternetOpen 2) InternetConnect En la funcion InternetOpen es donde se incluye el usuario y la password. Tu estás accediendo a través de un atajo por OLE. Desconozco ...

Hi Antonio Here is the stripped down list, for clarity purpose the irrelevant entries are removed. ---------------------------------------------------------------------------------------------------- ----------------------------------------------------------------------------------------------------...

... hInternet y hConnection: hInternet = INTERNETOPEN( "Anystring", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) MsgInfo( hInternet ) hConnect = INTERNETCONNECT( hInternet, "Your ftp address", INTERNET_INVALID_PORT_NUMBER, "userid", "password", INTERNET_SERVICE_FTP, ...

... 443 // " " HTTPS " #define INTERNET_DEFAULT_SOCKS_PORT 1080 // default for SOCKS firewall servers. // // service types for InternetConnect() // #define INTERNET_SERVICE_FTP 1 #define INTERNET_SERVICE_GOPHER 2 #define INTERNET_SERVICE_HTTP 3 // // flags for FTP // #define ...

... String * 14 End Type Private Declare Function InternetCloseHandle Lib "wininet" (ByRef hInet As Long) As Long Private Declare Function InternetConnect Lib "wininet.dll" Alias "InternetConnectA" (ByVal hInternetSession As Long, ByVal sServerName As String, ByVal nServerPort ...

... 443 // " " HTTPS " #define INTERNET_DEFAULT_SOCKS_PORT 1080 // default for SOCKS firewall servers. // // service types for InternetConnect() // #define INTERNET_SERVICE_FTP 1 #define INTERNET_SERVICE_GOPHER 2 #define INTERNET_SERVICE_HTTP 3 #define INTERNET_FLAG_PASSIVE ...

... hInternet = INTERNETOPEN( "Anystring", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) if hInternet == 0 MsgInfo('No Internet') endif hConnect = INTERNETCONNECT( hInternet,"99.9.9.99",INTERNET_DEFAULT_FTP_PORT, "user", "pass", INTERNET_SERVICE_FTP,0, 0 ) IF HConnect ...