ASP网站制作之asp+初体验---用c#写的asp+域名查询程序...
使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样,管理远程主机上的数据库,对表格、记录进行各种操作。asp+|程序终究偶然间能够学点新器材了,明天大抵看了一下有关asp+的材料,而且写了个域名查询的页面,感到很不错,asp+比起asp来前进其实是太年夜了,只管用asp+组件也能完成域名查询的功效,而且头几天我用vc写过这么个组件,但用asp+复杂
便利多了。好了,空话少提,看源码吧。
<%@PageLanguage="C#"%>
<%@AssemblyName="System.Net"%>
<%@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);
intnLength=arrDomain.Length;
Hashtabletable=newHashtable();
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;//definewhoisserver
//ifthedomainnamesendiscnthentheserveriscnnic,otherwiseisnetworksolutions
if(arrDomain=="cn")
{
strServer="159.226.6.139";
}
else
{
strServer="whois.networksolutions.com";
}
if(table.ContainsKey(arrDomain))
{
strServer=table].ToString();
}
elseif(nLength==2)
{
//2-letterTLDsalwaysdefaulttoRIPEinEurope
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();
if(0==tcpc.Connect(strServer,43))
{
strDomain+="
";
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();
while(-1!=sr.Peek())
{
strBuilder.Append(sr.ReadLine()+"<br>");
}
tcpc.Close();
bSuccess=true;
strResponse=strBuilder.ToString();
}
catch(Exceptione)
{
strResponse=e.ToString();
}
returnbSuccess;
}
else
{
strResponse="CouldnotconnecttoWhoisserver";
returnfalse;
}
returnfalse;
}
</script>
<html>
<head>
<title></title>
</head>
<body>
<formrunat="server">
Domainname:WWW.<asp:TextBoxid="txtDomain"value=""runat="server"/>
<asp:Buttonid="btnQuery"OnClick="doQuery"text="Query!"runat="server"/>
<BR><HRwidth="100%"><BR>
<asp:labelid="txtResult"runat="server"/>
</form>
</body>
</html>
</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。 用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。 另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件) 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助... 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习 代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。
页:
[1]