VB.Net Tutorial/Socket Network/IPEndPoint
Содержание
Create IPEndPoint from IP Address and port number
<source lang="vbnet">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</source>
Address Family: InterNetwork IP:Port: 127.0.0.1:12345 SocketAddress : InterNetwork:16:{48,57,127,0,0,1,0,0,0,0,0,0,0,0}
Create SocketAddress from IPEndPoint
<source lang="vbnet">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</source>
Address Family: InterNetwork IP:Port: 127.0.0.1:12345 SocketAddress : InterNetwork:16:{48,57,127,0,0,1,0,0,0,0,0,0,0,0}
Get AddressFamily from IPEndPoint
<source lang="vbnet">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</source>
Address Family: InterNetwork IP:Port: 127.0.0.1:12345 SocketAddress : InterNetwork:16:{48,57,127,0,0,1,0,0,0,0,0,0,0,0}
Get IP port from IPEndPoint
<source lang="vbnet">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</source>
Address Family: InterNetwork IP:Port: 127.0.0.1:12345 SocketAddress : InterNetwork:16:{48,57,127,0,0,1,0,0,0,0,0,0,0,0}