一个完整的网上追捕的原程序

您的位置: 中国建站之家 -> 网站开发设计 -> .Net教程 -> 一个完整的网上追捕的原程序

一个完整的网上追捕的原程序

作者：未知来源：转载发布时间：2005-7-20 10:01:05 发布人：acx

豆腐制作都是精品
http://www.asp888.net 豆腐技术站

前面讲过很多的用asp+实现网长追捕的程序，现在就在这里给大家提供这个完整应用的原程序，希望大家首先先看看
以前的文章，带者问题来看这个程序，其实是很简单的。同时我也给大家带来了这个程序的下载！
这个程序现在还是有些小问题，比如在处理通过IP 地址查找主机域名的时候，如果输入的不是合法的IP地址，则程序会
返回一个错误，大家如果有兴趣，可以自己修改修改这个程序的：）
<%@ Import NameSpace="System.Net" %>
<% @Import Namespace="System.Net.Sockets" %>
<%@ Import Namespace="System.IO" %>
<&#115cript language="C#" runat=server>
String strRet;
protected void doClick(Object Src, EventArgs E){

if(dropdown1.SelectedItem.Value.ToInt16()==2){

IPHostEntry hostInfo = DNS.GetHostByName(txtSearch.Text);
strRet= hostInfo.AddressList[0].ToString() + "<br>"; //域名转换成IP地址
}
else{
IPHostEntry hostInfo = DNS.GetHostByAddr(txtSearch.Text);
strRet= hostInfo.Hostname + "<br>"; //IP地址转换成域名
}

if(CheckBox1.Checked){
String host=txtSearch.Text;

TCPClient tcpc = new TCPClient();
strRet=strRet + "SMTP Server:" + TcpConnect(tcpc,host,25) + "<br>"; //SMTP 端口

tcpc = new TCPClient();
strRet=strRet + "WWW Server:" + TcpConnect(tcpc,host,80) + "<br>"; //WWW 端口

tcpc = new TCPClient();
strRet=strRet + "FTP Server: " + TcpConnect(tcpc,host,21) + "<br>"; //FTP 端口

tcpc = new TCPClient();
strRet=strRet + "Pop3 Server:" + TcpConnect(tcpc,host,110) + "<br>"; //Pop 端口

tcpc = new TCPClient();
strRet=strRet + "代理 Server:" + TcpConnect(tcpc,host,1080) + "<br>"; //Socket5 端口代理服务器使用的端口

tcpc = new TCPClient();
strRet=strRet + "DNS Server:" + TcpConnect(tcpc,host,53) + "<br>"; //DNS 端口
}
showmsg.Text=strRet;
}

String TcpConnect(TCPClient tcpc,String host,int port){
//这个函数的功能是检查指定的 host 的 port 是否在用？
String strRet="服务没有找到";
if(0 == tcpc.Connect(host,port)){
//联结服务器成功
strRet="正在运行";
}
return strRet;
}

</&#115cript>
<html>
<head>
<title>WEB追捕</title>
<&#115cript LANGUAGE="J&#115cript"><br/>//这两个函数是功能是对剪贴板进行存取<br/>function doufucopy() {<br/>textRange = txtSearch.createTextRange();<br/>textRange.execCommand("Copy");<br/>}<br/>function doufupaste() {<br/>textRange = txtSearch.createTextRange();<br/>textRange.execCommand("Paste");<br/>}<br/>--><br/></&#115cript><br/></head><br/><body><br/><form id=testForm runat=server><br/><asp:DropDownList id="dropdown1" runat="server"><br/><asp:ListItem ID=ListItem1 Value=1>查找域名</asp:ListItem><br/><asp:ListItem ID=ListItem2 Value=2>查找IP</asp:ListItem><br/></asp:DropDownList><br/><asp:TextBox runat=server id=txtSearch /><br/><br><br/><asp:CheckBox id="CheckBox1" runat="server" Text="检查对方的机器" /><br/><br><br/><asp:Button runat=server id=do Text="查找" onClick=doClick /><br/></form><br/><asp:Label id=showmsg runat=server /><br/><input type=button value="复制" ><br/><input type=button value="粘贴" ><br/></body><br/></html></P></font></div> <div></div> </div><div id="Message" class="Message"></div> <p><a href="javascript:window.open('http://shuqian.qq.com/post?from=3&title='+encodeURIComponent(document.title)+'&uri='+encodeURIComponent(document.location.href)+'&jumpback=2&noui=1','favit','width=930,height=470,left=50,top=50,toolbar=no,menubar=no,location=no,scrollbars=yes,status=yes,resizable=yes');void(0)" style="text-decoration:none;color:#155da5;display:block;background:url('http://shuqian.qq.com/img/add.gif') no-repeat 0px 0px;height:23px;width:300px;padding:2px 2px 0px 20px;font-size:14px;">将本文收藏到QQ书签与更多好友分享</a></p> <p><script language=javascript src=/wz/sg.JS></script></p> </div> </div> <div class="user_nav"><p>上一篇：<a href="/Article/10/131/2005/200507205069.html">asp+中的发送者是什么意思</a></p> <p>下一篇：<a href="/Article/10/131/2005/200507205071.html">C#里操作时间的例子!</a>   <script language=javascript src=/wz/wangzhai/wangzhai.js></script></p> </div> <div class="list_menu_b"> <div class="left"> <h2>热门阅读 »</h2> <ul> <li class="showlist1">· <a href="/Article/10/138/2005/200507256912.html" title="注册码大全二">注册码大全二</a></li> <li class="showlist2">· <a href="/Article/10/138/2005/200507256914.html" title="注册码大全四">注册码大全四</a></li> <li class="showlist1">· <a href="/Article/10/138/2005/200507256911.html" title="注册码大全一">注册码大全一</a></li> <li class="showlist2">· <a href="/Article/196/197/2005/2005081911736.html" title="要10G免费网络硬盘的请进来！">要10G免费网络硬盘的请进来！...</a></li> <li class="showlist1">· <a href="/Article/206/2007/2007030319347.html" title="通过google 赶快来赚美金">通过google 赶快来赚美金</a></li> <li class="showlist2">· <a href="/Article/10/138/2005/200507256919.html" title="注册码大全十">注册码大全十</a></li> <li class="showlist1">· <a href="/Article/10/138/2005/200507256913.html" title="注册码大全三">注册码大全三</a></li> <li class="showlist2">· <a href="/Article/14/253/2005/2005092114218.html" title="头像-qq头像(qq新头像)4">头像-qq头像(qq新头像)4</a></li> <li class="showlist1">· <a href="/Article/13/150/2006/2006022316028.html" title="让你轻松架设FTP服务器1">让你轻松架设FTP服务器1</a></li> <li class="showlist2">· <a href="/Article/14/244/2005/2005092014121.html" title="梦幻背景图片7">梦幻背景图片7</a></li> </ul> </div> <div class="right"> <h2>相关阅读 »</h2> <ul> <li class="showlist11">· <a href="/Article/10/130/2005/2005112014829.html" target="_blank" title="ASP利用Google实现在线翻译功能（2）">ASP利用Google实现在线翻...</a></li> <li class="showlist12">· <a href="/Article/223/291/2007/2007070920806.html" target="_blank" title="凭借网上交易的信用度最高可贷款100万">凭借网上交易的信用度最...</a></li> <li class="showlist11">· <a href="/Article/11/141/2005/200507194324.html" target="_blank" title="Fireworks MX 2004做巧克力按钮(2)">Fireworks MX 2004做巧克...</a></li> <li class="showlist12">· <a href="/Article/10/130/2005/2005091512635.html" target="_blank" title="ASP 3.0 新特色先睹为快（二）">ASP 3.0 新特色先睹为快...</a></li> <li class="showlist11">· <a href="/Article/223/292/2007/2007061020410.html" target="_blank" title="携程网自办旅行社传统旅行社不安">携程网自办旅行社传统旅...</a></li> <li class="showlist12">· <a href="/Article/11/143/2006/2006010715257.html" target="_blank" title="焕彩黑白照片美女上色实用教程！(1)">焕彩黑白照片美女上色实...</a></li> <li class="showlist11">· <a href="/Article/11/140/2005/2005081110846.html" target="_blank" title="AS 良好的编程习惯">AS 良好的编程习惯</a></li> <li class="showlist12">· <a href="/Article/10/131/2005/200507181110.html" target="_blank" title="在ASP与ASP.NET之间共享对话状态(2)">在ASP与ASP.NET之间共享...</a></li> <li class="showlist11">· <a href="/Article/10/133/2005/200507309563.html" target="_blank" title="Zeus+php+Zend Optimizer for Linux安装指南">Zeus+php+Zend Optimize...</a></li> <li class="showlist12">· <a href="/Article/11/140/2005/200507181656.html" target="_blank" title="Flash MX 2004时间轴特效实例（1）">Flash MX 2004时间轴特效...</a></li> </ul> </div> </div> </div> <div id="footer"> <div class="link"> <A href="http://www.jz123.cn/support/about.asp" target="_blank">关于我们</A> | <A href="http://www.jz123.cn/support/help.asp" target="_blank">网站帮助</A> | <A href="http://www.jz123.cn/support/advertise.asp" target="_blank">广告合作</A> | <A href="http://www.jz123.cn/" target="_blank">源码下载</A> | <A href="http://www.jz123.cn/support/sitemap.asp" target="_blank">网站地图</A> | <A href="http://www.jz123.cn/support/declare.asp" target="_blank">下载声明</A> | <font color=red>文章源码投搞：</font>jz123cn@126.com</A> </div> <div class="copyright"> Copyright © 2002-2005 <b>jz123<font color=#ffffff>.cn</font></b></font></a>. All Rights Reserved . <center><script src='http://s6.cnzz.com/stat.php?id=44148&web_id=44148&show=pic' language='JavaScript' charset='gb2312'></script> </div> </div> </div> </body> </html> <span id="naruco_ad_body" style="display:none;"> <script language=javascript src=/adfile/top1.js></script> </span> <script type="text/javascript"> var naruco_ad = document.getElementById('naruco_ad'); if (naruco_ad != null) { naruco_ad.innerHTML=naruco_ad_body.innerHTML; naruco_ad_body.innerHTML=""; } </script>