国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

用c#寫的asp+域名查詢程序

2024-05-04 11:06:35
字體:
來源:轉載
供稿:網友

終于有時間可以學點新東西了,今天大略看了一下有關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[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>

 

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 弋阳县| 米脂县| 蒲城县| 绵阳市| 浮梁县| 古丈县| 平果县| 兴安县| 大港区| 南江县| 黄大仙区| 政和县| 天门市| 通江县| 固阳县| 华安县| 巴青县| 葵青区| 卢湾区| 莱阳市| 平江县| 淅川县| 婺源县| 遂宁市| 定兴县| 大方县| 公主岭市| 怀来县| 会昌县| 云阳县| 德庆县| 安平县| 永吉县| 高雄县| 通辽市| 扶风县| 永宁县| 嘉善县| 内乡县| 九台市| 永兴县|