Attribute VB_Name = "Mod1"
Option Explicit

'Public Declare Sub CopyMemoryX Lib "kernel32" Alias "RtlMoveMemory" (Dest As Any, Src As Any, ByVal cb&)
'Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
'Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
'Public Declare Function GetTickCount Lib "kernel32" () As Long

'SocketType property values
Public Const SOCK_TCP = 1  'PF_INET, SOCK_TCP, IPPROTO_TCP)
Public Const SOCK_UDP = 2  'PF_INET, SOCK_UDP, IPPROTO_UDP)
Public Const SOCK_IP = 3   'PF_INET, SOCK_UDP, IPPROTO_IP)

