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

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 中的 用c#写的asp+域名查询程序

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-11-03   浏览: 133 ::
收藏到网摘: n/a

终于有时间可以学点新东西了，今天大略看了一下有关asp+的资料，并且写了个域名查询的页面，感觉很不错，asp+比起
asp来进步实在是太大了，尽管用asp+组件也能实现域名查询的功能，并且前几天我用vc写过这么个组件，但用asp+简单方
便多了。好了，废话少提，看源码吧。

<% @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
{
Stream s = tcpc.GetStream();
s.Write(arrDomain, 0, strDomain.Length);

StreamReader sr = new StreamReader(tcpc.GetStream(), Encoding.ASCII);
StringBuilder strBuilder = new StringBuilder();
while (-1 != sr.Peek())
{
strBuilder.Append(sr.ReadLine()+"<br>");
}
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>
<title></title>
</head>
<body>

<form runat="server">
Domain name: WWW . <asp:TextBox id="txtDomain" value="" runat="server" />
<asp:Button id="btnQuery" OnClick="doQuery" text="Query!" runat="server" />
<BR><HR width="100%"><BR>
<asp:label id="txtResult" runat="server" />
</form>

</body>
</html>

from http://www.top888.net/zwcj/10-13/jc01.htm