仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 571|回复: 7
打印 上一主题 下一主题

[学习教程] ASP网站制作之asp+初体验---用c#写的asp+域名查询程序...

[复制链接]
爱飞 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:22:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
使用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[1].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[arrDomain.Length-1]=="cn")
{
strServer="159.226.6.139";
}
else
{
strServer="whois.networksolutions.com";
}

if(table.ContainsKey(arrDomain[1]))
{
strServer=table[arrDomain][1]].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的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。
乐观 该用户已被删除
沙发
发表于 2015-1-29 06:33:48 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
深爱那片海 该用户已被删除
板凳
发表于 2015-2-5 20:50:41 | 只看该作者
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
小魔女 该用户已被删除
地板
发表于 2015-2-13 10:57:48 | 只看该作者
作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。
海妖 该用户已被删除
5#
发表于 2015-3-3 20:07:02 | 只看该作者
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
不帅 该用户已被删除
6#
发表于 2015-3-11 13:01:28 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
兰色精灵 该用户已被删除
7#
发表于 2015-3-18 11:53:48 | 只看该作者
代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。
只想知道 该用户已被删除
8#
发表于 2015-3-25 20:22:40 | 只看该作者
我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 10:54

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表