VB.NET:遍历主机的所有IP地址
敬业的IT人
互联网
佚名
2008-5-23 19:29:25
Imports System
Imports System.Net
Module Module1
Sub Main()
Dim strMachineName As String
'得到主机名
Console.WriteLine("Host Name: " + strMachineName)
'通过名字得到主机
Dim ipHost As IPHostEntry
ipHost = Dns.GetHostByName(strMachineName)
'你可以得到网络上任何站点的DNS数据信息。
'语法如下：
'ipHost = Dns.GetHostByName("xml.sz.luohuedu.net")
Console.WriteLine("Host Aliases: " + ipHost.Aliases.Length.ToString())
'以数组的形式返回相关主机的地址信息
Dim ipAddr() As IPAddress = ipHost.AddressList
Dim count As Integer
'Enumerate the IP Addresses
For count = 0 To ipAddr.GetUpperBound(0)
Console.Write("IP 地址 {0}：{1} ", count, _
ipAddr(count).ToString)
Next
End Sub
End Module
- 最新文章
- 从Visual Basic 6.0 到 Visual Bas..[05-23]
- VB.NET2002与VB.NET2003有什么不同？[05-23]
- VB.NET中的组件开发源代码剖析[05-23]
- 可恶的VB 快乐的.NET[05-23]
- Visual Basic.Net连各种数据库的几种方法[05-23]
- VB.NET中的多窗体编程：升级到 .NET[05-23]
- 相关文章
- VB.NET2002与VB.NET2003有什么不同？[05-23]
- VB.NET中的组件开发源代码剖析[05-23]
- VB.NET中的多窗体编程：升级到 .NET[05-23]
- VB.NET中使用GDI画图具体应用。[05-23]
- VB.NET中实现关机/休眠/重启/注销的类[05-23]
- vb.net执行外部程序的代码[05-23]
