一个完整的网上追捕的原程序 -pc6资讯

您的位置：首页 → 精文荟萃 → 软件资讯 → 一个完整的网上追捕的原程序

一个完整的网上追捕的原程序 时间：2004/10/7 18:19:00来源：本站整理作者：蓝点我要评论(0): 　前面讲过很多的用asp+实现网长追捕的程序，现在就在这里给大家提供这个完整应用的原程序，希望大家首先先看看
以前的文章，带者问题来看这个程序，其实是很简单的。同时我也给大家带来了这个程序的下载！
这个程序现在还是有些小问题，比如在处理通过IP 地址查找主机域名的时候，如果输入的不是合法的IP地址，则程序会
返回一个错误，大家如果有兴趣，可以自己修改修改这个程序的：）
<%@ Import NameSpace="System.Net" %>
<% @Import Namespace="System.Net.Sockets" %>
<%@ Import Namespace="System.IO" %>

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() + "
"; //域名转换成IP地址
}
else{
IPHostEntry hostInfo = DNS.GetHostByAddr(txtSearch.Text);
strRet= hostInfo.Hostname + "
"; //IP地址转换成域名
}

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

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

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

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

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

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

tcpc = new TCPClient();
strRet=strRet + "DNS Server:" + TcpConnect(tcpc,host,53) + "
"; //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;
}

WEB追捕

//这两个函数是功能是对剪贴板进行存取
function doufucopy() {
textRange = txtSearch.createTextRange();
textRange.execCommand("Copy");
}
function doufupaste() {
textRange = txtSearch.createTextRange();
textRange.execCommand("Paste");
}
-->

查找域名
查找IP

文章评论

查看所有0条评论>>