当前位置:首页 » 操作系统 » asp小偷源码

asp小偷源码

发布时间: 2025-08-17 03:03:02

❶ ASP小偷程序采集卡死,是什么原因

没看到你的采集代码很难给你准确的回答。
我猜是这样的。
你的代码原理是从网络搜索后采集下数据放入你的数据库或页面,总之是先从网络上传到服务器的。
建议你不要上传文件。
之上传链接就好了。
因为向服务器上传多个文件很慢的。一般有默认的时间限制过了时间就认为页面无法打开了。

❷ asp的fso有哪些 经典 用途 菜鸟问题............

1.可以做文件管理系统 、可以使用 FSO 去打开别人的网站从而盗取源码 ,然后可以使用正则表达式制定相应规则解析这些源码从而达到小偷程序的效果 。
2.仅仅依靠 FSO 完全可以实现静态化 。
(例如 http://www.ylmx.net ,这个网站 ,可以用 ASP+FSO 完全实现 ,这只不过是 php + "FSO" 的而已【当然 ,PHP 里只有 fopen 这个函数】)
3.是的 ,对搜索引擎有要求的网站(ASP)通常都是 FSO 实现的!re_write 之类 IIS 插件是实现伪静态用的 。但现在的站偏向纯静态 。(若不是功能很多很及时的话)
4.很简答 ,数据库准备好相关字段 。有 文件夹字段 、文件名字段 ,通过 FSO 建立文件夹 。而后再使用 FSO 将新闻字段内容写进相应路径中(路径为 文件夹/文件)
5.完全可以 ,可以存储为 TXT 或者其他格式的文本文件 。其实 FSO 和 XML 是一个道理 ,倘若你正则表达式用的很好 ,完全可以使用 FSO 读取 XML 然后用正则表达式劈出 XML 内容 。
6.不普遍使用 。因为数据库(如 SQLSERVER 、ACCESS)才是主打 。数据库相对文本文件读取做了很多的优化技术 。否则也不会出现数据库这个产品了 。
7.如果你一点基础都没有 ,我是写出一堆代码来 ,你一样跟白痴一样看不懂的 。这属于基础内容 。请自己看书理解 。思路 :将 ASP 表单内容接受过来并存储在一个变量里 ,最后使用 FSO 将变量写进一个文本文件中(文件名可以采用随机数作决定)。
和正则表达式无关 。
8.区别不大 。没区别 ,你学过了 ASP 正则表达式没必要学 JAVASCRIPT 的正则表达式 ,你需要学的是操作正则表达式的环境 。(就是几个函数而已 ,如果你有基础 ,不出 5 分钟就一定会用 ,如果你没基础 ,那可就不好说了)

❸ 小偷程序的特点

1、可以采集80%以上的站点,只需简单的在后台配置采集替换规则即可。
2、突破图片防盗链系统,可以将目标站的图片下载到服务器上面,提高访问效率,增加网络图片的收录。
3、支持静态生成,即使目标站服务器出现错误,本站依然不受影响(前提是开启静态生成和图片下载到本地服务器)。
4、授权版可以启用全国分站功能,自动产生长尾关键字,适合全国服务行业和信息查询服务。
语言代码1.Perl
#!/usr/bin/perl
# 通过IE浏览器中的[查看]->[源文件]可看HTML文件内容。
# perl中可以不通过浏览器直接取得HTML文件内容,用的
# 就是perl模块libWWW
use strict;
use LWP::UserAgent;
use threads::shared;
my $URL = http://*******;
my $ua = new LWP::UserAgent;
$ua->agent('Mozilla/3.0');
my ($address,$params) = split(/?/,$URL);
my $req = new HTTP::Request ('GET',$address);
$req->content_type('applicationn/x-www-form-urlencoded');
$req->content();
my $res = $ua->request($req);
my $content = $res->as_string();
# 此时$content里面是网页内容
print $content;
$URL里就是要偷数据的地址。例子中的是本人的小站。偷自己的东西,没犯法吧?
当然,这个会把网页内容打印到控制台。所以很多数据或者需要保存的时候,应该用重定向符号输出到文件。如:
perl yourf ile. pl >a.html
这样,输出的结果就保存在文件a.html中了。至于分析的语句,PERL可以使用方便而简洁的正则,限制于不同程序的不同分析,这里就不写分析语句了。
2.Active Server Pages - VBScript
ASP版本的小偷程序,也不见得有什么太大的难度。不过应用了XMLHTTP组件的功能而已,事实上,我也很惊讶ASP写这个程序的简短之处:
<%
URL = http://*******
Set objXMLHTTP = CreateObject(Microsoft.XMLHTTP)
objXMLHTTP.Open GET,URL,False
objXMLHTTP.Send
Response.Write Server.HTMLEncode(objXMLHTTP.responseText)
Set objXMLHTTP = Nothing
%>
简单不?呵呵....
3.Active Server Pages - JScript
从原理来说,这个和VBScript差不多。从语句来说,这个跟VBScript也差不多-毕竟,它们都用同一个组件:
<script language=JScript>
var xmlhttp = new ActiveXObject(Msxml2.XMLHTTP.4.0);
xmlhttp.Open(POST, http://*******, false);
xmlhttp.Send();
alert(xmlhttp.responseText);
</script>
4.Java
Java用来干这个,实在有点大材小用的感觉:
import jav a .io.*;
import jav a. net.*;
public class getURLContent
{
public static void main(String args[]) throws MalformedURLException,IOException
{
URL url = new URL(url address);
BufferedReader reader = new BufferedReader(new InputStreamReader(url.openStream()));
while(reader.ready()){
System.out.println(reader.readLine());
}
}
}
5.php
php:
$url='http://网址';
echo file_get_contents($url);
?>
6.Asp. Net
c#:
System .Net.WebClient webclient = new System .Net.WebClient();
webclient.DownloadString(http://*******);
vb.n et:
Dim webclient As New System .Net.WebClient()
webclient.DownloadString(http://*******)
实例
QQ网站上的天气程序
代码如下:
<%
On Error Resume Next
Server.ScriptTimeOut=9999999
Function getHTTPPage(Path)
t = GetBody(Path)
getHTTPPage=BytesToBstr(t,GB2312)
End function
首先,进行小偷程序的一些初始化设置,以上代码的作用分别是忽略掉所有非致命性错误,把小偷程序的运行超时时间设置得很长(这样不会出现运行超时的错误),转换原来默认的UTF-8编码转换成GB2312编码,否则直接用XMLHTTP组件调用有中文字符的网页得到的将是乱码。
Function GetBody(url)
on error resume next
Set Retrieval = CreateObject(Microsoft.XMLHTTP)
With Retrieval
.Open Get, url, False, ,
.Send
GetBody = .ResponseBody
End With
Set Retrieval = Nothing
End Function
然后调用XMLHTTP组件创建一个对象并进行初始化设置。
Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject(adodb.stream)
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
Function Newstring(wstr,strng)
Newstring=Instr(lcase(wstr),lcase(strng))
if Newstring<=0 then Newstring=Len(wstr)
End Function
处理抓取回来的数据需要调用adodb.stream组件并进行初始化设置以下即为页面显示部分
<%
Dim wstr,str,url,start,over,city
’定义一些需要使用到的变量
city = Request.QueryString(id)
’程序传回的ID变量(即用户选择的城市)赋给id
url=http://appnews-qq-com/cgi-bin/news_qq_search?city=&city&
这里设置需要抓取的页面地址,当然你也可以直接指定某个地址而不使用变量
wstr=getHTTPPage(url)
获取指定页面的全部数据
start=Newstring(wstr, <html>)
这里设置需要处理的数据的头部,这个变量应视不同情况而设置,具体内容可以通过查看需要抓取的页面的源代码来确定。因为在这个程序里我们需要抓取整个页面,所以设置为页面全部抓取。注意,设置的内容必须是页面内容唯一的,不可以重复。
over=Newstring(wstr, </HTML>)
和start相对应的就是需要处理的数据的尾部,同样的,设置的内容必须是页面中唯一的。
body=mid(wstr,start,over-start)
’设置显示页面的范围
下面就是动用干坤挪移+++的时候了,通过replace可以用一些字符替换掉数据中指定的字符。
body = replace(body,skin1,新浪天气预报 - 麦小偷网络)
body = replace(body,http://appnews-qq-com/cgi-bin/news_qq_search?city,tianqi.asp?id)
本程序中已经完成了替换的工作,如果有其他需要的话可以继续进行类似的替换操作。
response.write body
%>
替换完需要修改的内容后,就可以把修改的内容显示在页面上了。至此程序结束

❹ 求小说小偷源码

PT小说小偷免费版v1.94源码下载-小偷采集源码-PHP源码-源码下载中心
...PT小说小偷免费版v1.94,源码大小:572KB,最后更新日期:2010-4-26,源码下载人气:1102,功能简介1、多规则切换:收费版已经提供了3个规则,奇文的已经破解aspnetpager可以
...
code.knowsky.com/down/15834.html
wap小说小偷源码下载-WAP系统源码-ASP源码-源码下载中心-Code.knowsky.comwap小说小偷,源码大小:15KB,最后更新日期:2010-5-3,源码下载人气:146,修改自e_book
可随意修改或传播原作者:
曾qq
失效请自行修改,或关注本人博客,我有时间就修改下
...
code.knowsky.com/down/16207.html
e路小说小偷v3.0228源码下载-小偷采集源码-PHP源码-源码下载中心-Code
...e路小说小偷v3.0228,源码大小:24KB,最后更新日期:2010-3-1,源码下载人气:833,这是一个免费小说网的书库小偷,全部代码由作者记事本手工编写完成,和网上其它书库小偷
...
code.knowsky.com/down/15174.html
小说小偷简单asp版源码下载-小偷采集源码-ASP源码-源码下载中心-Code
...小说小偷简单asp版,源码大小:8KB,最后更新日期:2009-7-13,源码下载人气:748,小说小偷简单asp版进行设置config.asp放上去就可以用了。
code.knowsky.com/down/15161.html
6号联盟小说小偷v1.0(伪静态版)
源码下载-小偷采集源码-ASP源码-源码
...6号联盟小说小偷v1.0(伪静态版)
,源码大小:108KB,最后更新日期:2010-5-10,源码下载人气:272,本程序是一套免更新免维护的自动更新系统,采用网络中已经成熟、稳定地
...
code.knowsky.com/down/16235.html
百灵小说小偷v4.1从本版本开始,小说程序加上后台,便于新手管理,但功能有限制。
修复部分链接出站的错误。
采用伪静态,利于搜索引擎收录。
网站基本信配置可以到后台操作,也可以
...
code.knowsky.com/down/16474.html

热点内容
linux网络流量 发布:2025-08-17 05:07:32 浏览:741
计算机存储负数 发布:2025-08-17 05:01:47 浏览:279
ip备份链接到服务器出现问题 发布:2025-08-17 04:56:45 浏览:606
服务器大小怎么区别 发布:2025-08-17 04:54:34 浏览:503
工具编译器选项目录 发布:2025-08-17 04:54:31 浏览:874
linux启动控制台 发布:2025-08-17 04:53:47 浏览:150
加密兔能赚钱吗 发布:2025-08-17 04:50:42 浏览:40
linuxat命令执行命令 发布:2025-08-17 04:37:23 浏览:784
vivo手机密码怎么改 发布:2025-08-17 04:35:58 浏览:957
电脑设置成fz服务器 发布:2025-08-17 04:31:01 浏览:937