用ASP.Net编写的查询域名的程序- ASP.NET

当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 用ASP.Net编写的查询域名的程序

ASP.NET: Internet Explorer 编程简述（二）在IE中编辑OLE嵌入文档; 移动窗体; .NET 2.0获取数据库连接统计数据; VB.NET 拖动无边框的窗体; 利用WH_CBT Hook将非模态对话框显示为模态对话框; Aspect#应用 - 权限验证; VB 从零开始编外挂(一); 【错误解决】Unable to find script library 'WebUIValidation.js'; VB 从零开始编外挂(四); DTD指南(3)-DTD-Elements(元素); 知识库文章MDL9745154-File:Microsoft Visual Basic 运行时库; .net手机软件开发（六）OBEX应用：文件传输部分; 在winform中使用WebBrowser控件时怎样去除IE的滚动条; WINZIP及WINRAR命令!!!!!; 智能客户端相关Application Block结构功能分析(二); 如何在VB中操作EXCEL（一段代码，两个可以使用的过程）; 在C#中用最简洁有效的代码执行存储过程并返回数据; .Net的Collection类的一些使用说明; ASP.NET实现数据图表c; 用asp.net画饼图

No. « ‹ 144 145 146 147 › »

技术文章搜索

关键字

ASP.NET 中的用ASP.Net编写的查询域名的程序

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 163 ::

收藏到网摘: n/a

用ASP.Net写一个发送ICQ信息的程序 .Net将如何影响我们？（一）

这段程序最早是bigengle兄弟贴在chinaasp上的，是个很不错的程序来讲解ASP.Net的高级应用。不过最大的缺点就是查询中国域名时不支持中文，所出来的信息中文不能显示，小弟我稍微改了一下，这个已经能够支持中文了。呵呵，关于这个例子，我在国外的站点上放了了一个大家可以看 
 
http://aspx1.brinkster.com/feidao/named.aspx 
 
这个主机是国外的，所以对中文支持不太好(原因我在《亲密接触ASP.net》中说得很清楚)，大家如果看不到中文，请用选择IE中的"编码"---"简体中文". 
 
下面是源程序。 
 
<% @ Page Language="C#" %> 
<% @ Assembly Name="System.Net" %> 
<% @ Import Namespace="System.Net.Sockets" %> 
<% @ Import Namespace="System.Text" %> 
<% @ Import Namespace="System.IO" %> 
<% @ Import Namespace="System.Collections" %> 
<script language="C#" runat="server"> 
void doQuery(Object sender, EventArgs e) 
{ 
String strDomain = txtDomain.Text; 
char[] chSplit = {'.'}; 
string[] arrDomain = strDomain.Split(chSplit); 
 
int nLength = arrDomain.Length ; 
Hashtable table = new Hashtable(); 
table.Add("de", "whois.denic.de"); 
table.Add("be", "whois.dns.be"); 
table.Add("gov", "whois.nic.gov"); 
table.Add("mil", "whois.nic.mil"); 
 
String strServer ; //define whois server 
//if the domainname's end is cn then the server is cnnic ,otherwise is networksolutions 
if (arrDomain[arrDomain.Length - 1] == "cn") 
{ 
strServer = "159.226.6.139" ; 
} 
else 
{ 
strServer = "whois.networksolutions.com"; 
} 
 
if (table.ContainsKey(arrDomain)) 
{ 
strServer = table[arrDomain].ToString(); 
} 
else if (nLength == 2) 
{ 
// 2-letter TLD's always default to RIPE in Europe 
strServer = "whois.ripe.net"; 
} 
 
String strResponse; 
bool bSuccess = DoWhoisLookup(strDomain, strServer, out strResponse); 
if (bSuccess) 
{ 
txtResult.Text = strResponse; 
} 
else 
{ 
txtResult.Text = "Lookup failed"; 
} 
} 
 
bool DoWhoisLookup(String strDomain, String strServer, out String strResponse) 
{ 
strResponse = "none"; 
bool bSuccess = false; 
 
TCPClient tcpc = new TCPClient(); 
if (0 == tcpc.Connect(strServer, 43)) 
{ 
strDomain += "\r\n"; 
Byte[] arrDomain = Encoding.ASCII.GetBytes(strDomain.ToCharArray()); 
try 
{ 
String str; 
Stream s = tcpc.GetStream(); 
s.Write(arrDomain, 0, strDomain.Length); 
 
StreamReader sr = new StreamReader(tcpc.GetStream(), Encoding.Default); 
StringBuilder strBuilder = new StringBuilder(); 
while (-1 != sr.Peek()) 
{ 
strBuilder.Append(sr.ReadLine()+" "); 
 
} 
tcpc.Close(); 
 
bSuccess = true; 
strResponse = strBuilder.ToString(); 
} 
catch(Exception e) 
{ 
strResponse = e.ToString(); 
} 
 
return bSuccess; 
} 
else 
{ 
strResponse = "Could not connect to Whois server"; 
return false; 
} 
 
return false; 
} 
</script> 
<html> 
<head> 
<met

用ASP.Net写一个发送ICQ信息的程序 .Net将如何影响我们？（一）

ASP.NET 中的 用ASP.Net编写的查询域名的程序

评论 (0) All

ASP.NET 中的用ASP.Net编写的查询域名的程序