VB.Net by API/System.Net/IPEndPoint
Версия от 16:40, 26 мая 2010; (обсуждение)
Содержание
IPEndPoint.Address
Imports System.Net
Public Class Tester
Public Shared Sub Main
Dim ipAddr As System.Net.IPAddress
Dim ipEndPoint As System.Net.IPEndPoint
Dim socketAddr As System.Net.SocketAddress
Try
ipAddr = IPAddress.Parse("127.0.0.1")
ipEndPoint = New System.Net.IPEndPoint(ipAddr, 12345)
socketAddr = ipEndPoint.Serialize()
Console.WriteLine("Address Family: " & ipEndPoint.AddressFamily.ToString)
Console.WriteLine("IP:Port: " & ipEndPoint.Address.ToString & ":" & ipEndPoint.Port.ToString)
Console.WriteLine("SocketAddress : " & socketAddr.ToString())
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString)
End Try
End Sub
End Class
IPEndPoint.AddressFamily
Imports System.Net
Public Class Tester
Public Shared Sub Main
Dim ipAddr As System.Net.IPAddress
Dim ipEndPoint As System.Net.IPEndPoint
Dim socketAddr As System.Net.SocketAddress
Try
ipAddr = IPAddress.Parse("127.0.0.1")
ipEndPoint = New System.Net.IPEndPoint(ipAddr, 12345)
socketAddr = ipEndPoint.Serialize()
Console.WriteLine("Address Family: " & ipEndPoint.AddressFamily.ToString)
Console.WriteLine("IP:Port: " & ipEndPoint.Address.ToString & ":" & ipEndPoint.Port.ToString)
Console.WriteLine("SocketAddress : " & socketAddr.ToString())
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString)
End Try
End Sub
End Class
IPEndPoint.Serialize()
Imports System.Net
Public Class Tester
Public Shared Sub Main
Dim ipAddr As System.Net.IPAddress
Dim ipEndPoint As System.Net.IPEndPoint
Dim socketAddr As System.Net.SocketAddress
Try
ipAddr = IPAddress.Parse("127.0.0.1")
ipEndPoint = New System.Net.IPEndPoint(ipAddr, 12345)
socketAddr = ipEndPoint.Serialize()
Console.WriteLine("Address Family: " & ipEndPoint.AddressFamily.ToString)
Console.WriteLine("IP:Port: " & ipEndPoint.Address.ToString & ":" & ipEndPoint.Port.ToString)
Console.WriteLine("SocketAddress : " & socketAddr.ToString())
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString)
End Try
End Sub
End Class
New IPEndPoint
Imports System.Net
Public Class Tester
Public Shared Sub Main
Dim ipAddr As System.Net.IPAddress
Dim ipEndPoint As System.Net.IPEndPoint
Dim socketAddr As System.Net.SocketAddress
Try
ipAddr = IPAddress.Parse("127.0.0.1")
ipEndPoint = New System.Net.IPEndPoint(ipAddr, 12345)
socketAddr = ipEndPoint.Serialize()
Console.WriteLine("Address Family: " & ipEndPoint.AddressFamily.ToString)
Console.WriteLine("IP:Port: " & ipEndPoint.Address.ToString & ":" & ipEndPoint.Port.ToString)
Console.WriteLine("SocketAddress : " & socketAddr.ToString())
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString)
End Try
End Sub
End Class