ip1.aspx

来自「《精通ASP.NET网络编程》附带实例」· ASPX 代码 · 共 12 行

<%@Import NameSpace="System.Net"%>
<script language="VB" runat=server>
 protected Sub do1Click(Src As Object, E As EventArgs)
 Dim hostInfo As IPHostEntry=Dns.GetHostByAddress(txtIP.Text)
 showmsg.Text=hostInfo.HostName
 End Sub
</script>
<asp:Label runat=server id=showmsg/>
 <form id=testForm runat=server>
 要查找的IP地址：<asp:TextBox runat=server id=txtIP/>
 <asp:Button runat=server id=do1 Text="查找" onClick=do1Click />
</form>