FiveTech Software tech support forums

... WSACleanup() typically unloads any protocol-specific helper DLLs (Dynamic Link Libraries) that were loaded during the initialization process using WSAStartup(). These DLLs provide support for specific network protocols like TCP/IP. Cancels Pending Calls (with caution): It's important to note that ...

I use WSAStartup() ; cIp := GetHostByName( GetHostName() ) ; WSACleanup(), to get the local IP address. However my system has an EtherNet, Hamachi, and 2 VMware showing as adapters. The address returned by the function GetHostByName ...

Thank you, Karinha, it works! What are the WSAStartup/Wsacleanup functions for in this case? Why prescribe 2 times: cIp := GETHOSTBYNAME( "yoursite.com" ) cIp := GETHOSTBYNAME( "yoursite.com" ) Good Morning. This was a tip ...

Thank you, Karinha, it works!
What are the WSAStartup/Wsacleanup functions for in this case?
Why prescribe 2 times:
cIp := GETHOSTBYNAME( "yoursite.com" )
cIp := GETHOSTBYNAME( "yoursite.com" )

... asi.. IpLocal =:IPLOCAL() */ #include <Windows.h> #include <WinSock.h> #include <hbapi.h> HB_FUNC( IPLOCAL ) { WSADATA wsa_Data; WSAStartup( 0x101, &wsa_Data ); char szHostName[255]; gethostname(szHostName, 255); struct hostent *host_entry; host_entry = gethostbyname(szHostName); ...

... held me donne la meme erreur (same error) function SendMail() local oOutMail, cIP, oOutMail1 oDlg:SetMsg( "Sending Internet email..." ) WSAStartup() * oOutMail1 := TSmtp():New( cIP := GetHostByName( "mail.lpsi.qc.ca" ) ) oOutMail := TSmtp():New( cIP := GetHostByName( "smtphm.sympatico.ca",25,.t.,"wilsonrw@sympatico.ca", ...

... WSA ERROR CODE : 10060 can you held me function SendMail() local oOutMail, cIP, oOutMail1 oDlg:SetMsg( "Sending Internet email..." ) WSAStartup() * oOutMail1 := TSmtp():New( cIP := GetHostByName( "mail.lpsi.qc.ca" ) ) oOutMail := TSmtp():New( cIP := GetHostByName( "mail.lpsi.qc.ca" ...

Gracias Rafa, habrá que investigar

... hay una manera de mejorar el rendimiento si una sola conexión de base de datos se inicia y parada repetidamente. Internamente, libpq llama WSAStartup () y WSACleanup () para el inicio de la conexión y desconexión, respectivamente. WSAStartup () incrementa un contador de referencia interno ...

... distinta C:\VC2010\SDK\Include\winsock.h(871) : vea la declaración de 'getprotobyname' C:\VC2010\SDK\Include\winsock2.h(2200) : error C2375: WSAStartup' : nueva definición; vinculación distinta C:\VC2010\SDK\Include\winsock.h(875) : vea la declaración de 'WSAStartup' C:\VC2010\SDK\Include\winsock2.h(2219) ...

... :=hIniFile["SETUPMAIL"]["remitente"] * * asegurando que tenemos conexion a Internet mediante Windows Sockets DLL. nIError := WSAStartup() IF nIError == 0 // Si hay conexion * WSACleanUp() // Limpiamos Windows Sockets DLL * DEFINE FONT oFont NAME "Arial" SIZE 0, -16 ...

... ReplySize:=278,; Timeout:=2000 && Milisegundos de espera,bPing:=.f. default DestinationAddress := "www.google.com" if WSAStartup() != 0 return bPing endif DestinationAddress:=GetHostByName(DestinationAddress) IcmpHandle:=IcmpCreateFile() Replicas:=IcmpSendEcho(IcmpHandle, ...

Perdonar pero no he visto vuestros mensajes, aqui teneis el codigo para mostrar los dispositivos a tu alcance: function main() WSAStartup() nWsaError:=WSALookupServiceBegin(@lphLookup) if nWsaError<>0 // Tenemos un error localizado en wsaError.h do case case nWsaError = WSASERVICE_NOT_FOUND ...

... are welcome. Antonio, yes, but don't forget, I create these functions below: xBrJustify() ok xBrowseNew() ok xBrwAddColumn() ok VirtualRdd() ok WSAStartUp() ok WSAGetLastError() ok WSACleanUp() ok WSAAsyncSelect() ok WNetGetErrorText() ok VolumeName() ok WndTop() ok These functions my second. ...

... then you can get another free product :-) Antonio, ok. I'm working now.... xBrJustify() ok xBrowseNew() ok xBrwAddColumn() ok VirtualRdd() ok WSAStartUp() ok WSAGetLastError() ok WSACleanUp() ok WSAAsyncSelect() ok WNetGetErrorText() ok VolumeName() ok WndTop() ok Regards, Richard