The few lines below is basically what I'm trying to do:
Code:
Dim sPerm As New SocketPermission(NetworkAccess.Connect, TransportType.Tcp, "207.46.232.182", 80)
sPerm.PermitOnly()
Dim ePoint As New IPEndPoint(IPAddress.Parse("207.46.232.182"), 80)
Dim s As New Socket(ePoint.Address.AddressFamily, SocketType.Stream, ProtocolType.Tcp)
s.Connect(ePoint)
MsgBox("Connected:"