C#独立域名查询代码

时间：2021-05-20

whois.aspx

<%@PageLanguage="C#"%>
<%@ImportNamespace="System.Net.Sockets"%>
<%@ImportNamespace="System.Text"%>
<%@ImportNamespace="System.IO"%>
<%@ImportNamespace="System.Collections"%>
<scriptlanguage="C#"runat="server">
voiddoQuery(Objectsender,EventArgse)
{
StringstrDomain=txtDomain.Text;
char[]chSplit={'.'};
string[]arrDomain=strDomain.Split(chSplit);
//esdarfgenaueindomainname+einsuffixsein
if(arrDomain.Length!=2)
{
return;
}
//dassufficdarfnur2oder3zeichenlangsein
intnLength=arrDomain[1].Length;
if(nLength!=2&&nLength!=3)
{
return;
}
Hashtabletable=newHashtable();
table.Add("at","whois.nic.at");
table.Add("de","whois.denic.de");
table.Add("be","whois.dns.be");
table.Add("gov","whois.nic.gov");
table.Add("mil","whois.nic.mil");
StringstrServer="whois.OnlineNIC.com";
if(table.ContainsKey(arrDomain[1]))
{
strServer=table[arrDomain[1]].ToString();
}
elseif(nLength==2)
{
//2-letterTLD'salwaysdefaulttoRIPEinEurope
strServer="whois.ripe.net";
}
StringstrResponse;
boolbSuccess=DoWhoisLookup(strDomain,strServer,outstrResponse);
if(bSuccess)
{
txtResult.Text=strResponse;
}
else
{
txtResult.Text="Lookupfailed";
}
}
boolDoWhoisLookup(StringstrDomain,StringstrServer,outStringstrResponse)
{
strResponse="none";
boolbSuccess=false;
TcpClienttcpc=newTcpClient();
try
{
tcpc.Connect(strServer,43);
}
catch(SocketExceptionex)
{
strResponse="CouldnotconnecttoWhoisserver";
returnfalse;
}
strDomain+="\r\n";
Byte[]arrDomain=Encoding.ASCII.GetBytes(strDomain.ToCharArray());
try
{
Streams=tcpc.GetStream();
s.Write(arrDomain,0,strDomain.Length);
StreamReadersr=newStreamReader(tcpc.GetStream(),Encoding.ASCII);
StringBuilderstrBuilder=newStringBuilder();
stringstrLine=null;
while(null!=(strLine=sr.ReadLine()))
{
strBuilder.Append(strLine+"<br>");
}
tcpc.Close();
bSuccess=true;
strResponse=strBuilder.ToString();
}
catch(Exceptione)
{
strResponse=e.ToString();
}
returnbSuccess;
}
</script>
<html>
<head>
<title></title>
</head>
<body>
<formrunat="server">
域名whois查询(.NET版):<asp:TextBoxid="txtDomain"value="3cts.com"runat="server"/>
&nbsp;<asp:Buttonid="btnQuery"OnClick="doQuery"text="Query!"runat="server"/>
<BR><HRwidth="100%"><BR>
<asp:labelid="txtResult"runat="server"/>
</form>
</body>
</html>

声明：本页内容来源网络，仅供用户参考；我单位不保证亦不表示资料全面及准确无误，也不保证亦不表示这些资料为最新信息，如因任何原因，本网内容或者用户因倚赖本网内容造成任何损失或损害，我单位将不会负任何法律责任。如涉及版权问题，请提交至online#300.cn邮箱联系删除。

相关文章