Original concept FTP problem-CodePudding

I want to ask,, my company use ERP download program was developed by PB8, and using the PB5.0 FTP example in the socket. The PBL this,,, but found application in XP clients can download and use, and, under the Windows 7 can't FTP download,,, is there a player to know why? Firewall is shut down,,

CodePudding user response:

Debug it
Could it be a DLL is missing?

CodePudding user response:

See if the API defined problem

CodePudding user response:

FTP is called Windows DLL files, Windows 7 system DLL file name is changed, need to change with DLL

CodePudding user response:

I also met, unable to download under Windows 7

CodePudding user response:

reference arfa12 reply: 3/f

FTP is called Windows DLLS, the Windows 7 system DLL file name is changed, need to change with DLL name

What file name to excuse me?

CodePudding user response:

How to implement is more concerned about the FTP?
consult

CodePudding user response:

Can at the start of which is to check the system first, then according to the different system call API.

 
The environment lenv 
Li_rtn=GetEnvironment (lenv) 
If li_rtn & lt;> 1 then 
MessageBox (" System Error ", "Error on getting OS version -" + String (li_rtn), StopSign!) 
Return false 
End the if 

Choose a case lenv. OSMajorRevision 
Case 5//WinXP 
Enclosing iCryptoProvider=this. MS_ENH_RSA_AES_PROV_XP 
Case 6//Windows 7, Vista 
Enclosing iCryptoProvider=this. MS_ENH_RSA_AES_PROV 
In case the else 
MessageBox (" System Error ", "Error OS version -" + String (lenv. OSMajorRevision), StopSign!) 
Return false 
The end choose

CodePudding user response:

I saw, and PB in using sockets. PBL in win_socket_32 defines a lot of LOCAL external

The FUNCTION int WSAStartup (uint wVersionRequested, ref s_wsadata lpWSAData) LIBRARY "wsock32. DLL
"The FUNCTION int WSACleanup () LIBRARY "wsock32. DLL
"The FUNCTION int ntohs (int netshort) LIBRARY "wsock32. DLL
"The FUNCTION int htons (int hostshort) LIBRARY "wsock32. DLL
"The FUNCTION int WSAGetLastError () LIBRARY "wsock32. DLL
"The FUNCTION int getsockname (uint s, ref s_sockaddr name, ref int namelen) LIBRARY "wsock32. DLL
"The FUNCTION int setsockopt (uint socket, int level, int optname, s_linger optval, int optlen) LIBRARY "wsock32. DLL
"
PRIVATE FUNCTION uint socket (int af, int ttype, int protocol) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int WSAAsyncSelect (uint socket, uint Wnd, uint wMsg, long lEvent) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int the bind (uint s, s_sockaddr name, int namelen) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int listen (uint s, int backlog) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION uint accept (uint s, s_sockaddr addr, ref int addrlen) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int closesocket (uint socket) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int wsconnect (uint socket, s_sockaddr name, int namelen) LIBRARY "wsock32. DLL" ALIAS for "connect"
PRIVATE FUNCTION int WSACancelBlockingCall () LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int recv (int socket, ref blob buf, int len, int flags) LIBRARY "wsock32. DLL
"PRIVATE FUNCTION int the send (int socket, ref blob buf, int len, int flags) LIBRARY "wsock32. DLL
"
PRIVATE FUNCTION string GetHost (string lpszhost, ref string lpszaddress) library "pbws32. DLL
"PRIVATE FUNCTION int GetService (string lpszSevicet, string lpszProto) library "pbws32. DLL
"
PRIVATE FUNCTION Boolean KillTimer (uint Wnd, int IDEvent) LIBRARY "user32. DLL
"PRIVATE FUNCTION uint SetTimer (uint Wnd, int IDEvent, uint Elapse, ulong Dummy) LIBRARY "user32. DLL"