wininet

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a VB6 program that transfers files from a PC to an IBM mainfranme
using FTP.

The program has been operating perfectly for months and still works
perfectly on everything except Windows XP SP2. I have tried this on 2
different SP2 machines and it will not work on either machine. The firewall
is off on both machines.

On SP2 it get a timeout (12002) when it tries to call InternetConnect. I
have tried this with and without INTERNET_FLAG_PASSIVE.


The call to InternetConnect follows:

Private Declare Function InternetConnect Lib "wininet.dll" _
Alias "InternetConnectA" (ByVal hInternetSession As Long, _
ByVal sServerName As String, _
ByVal nServerPort As Integer, _
ByVal sUserName As String, _
ByVal sPassWord As String, _
ByVal lService As Long, _
ByVal lFlags As Long, _
ByVal lContext As Long) As Long

hConnection = InternetConnect(hOpen, _
sServer, _
21, _
sUser, _
sPassWord, _
INTERNET_SERVICE_FTP, _
INTERNET_FLAG_EXISTING_CONNECT Or _
INTERNET_FLAG_PASSIVE, _
0)

Can anyone offer me any hints or suggestions?
 
Ron said:
I have a VB6 program that transfers files from a PC to an IBM mainfranme
using FTP.

The program has been operating perfectly for months and still works
perfectly on everything except Windows XP SP2. I have tried this on 2
different SP2 machines and it will not work on either machine. The firewall
is off on both machines.

On SP2 it get a timeout (12002) when it tries to call InternetConnect. I
have tried this with and without INTERNET_FLAG_PASSIVE.
Click to expand...
Hi

A shot in the dark here:

If RPC is in some way used in the communication (or setup of it), SP2
have locked down RPC in SP2 (you can unlock it and see if it helps).

RPC Interface Restriction
http://www.microsoft.com/technet/prodtechnol/winxppro/maintain/sp2netwk.mspx#EGAA
 
Back
Top