Check for WinSock Installation
The WSAStartup() Function starts the WinSock Stuff in your appz, if it fails it return an error:
But remember: This is the first you have to do when using the WinSock-API but you much much more code if you want to write a client or server! You should search the web for such appz!
Code:
Public Declare Function WSAStartup Lib "wsock32.dll" (ByVal wVR As Long, lpWSAD As WSADataType) As Long
.
.
.
sub ????()
If WSAStartup(257, StartupData) Then
MsgBox "Winsock is not installed or Setup properly.", vbCritical, "Winsock Error"
End
End If
'here is much more init code....
end sub