C#编写asp+浅谈-c# ?.

C#编写asp+有很多可学的东西，这里主要介绍域名查询的页面，用C#编写asp+浅谈组件也能实现域名查询的功能。

终于有时间可以学点新东西了，今天大略看了一下有关C#编写asp+的资料，并且写了个域名查询的页面，感觉很不错，asp+比起asp来进步实在是太大了，尽管用C#编写asp+浅谈组件也能实现域名查询的功能，并且前几天我用vc写过这么个组件，但用C#编写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[1].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[1]))  
{  
strServer = table[arrDomain][1]].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>

【编辑推荐】