|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天程序|示例|小偷程序如今网下流行的小偷程序对照多,有旧事类小偷,音乐小偷,下载小偷,那末它们是怎样做的呢,上面我来做个复杂先容,但愿对列位站长有所匡助。
(一)道理
小偷程序实践上是经由过程了XML中的XMLHTTP组件挪用别的网站上的网页。好比旧事小偷程序,良多都是挪用了sina的旧事网页,而且对个中的html举行了一些交换,同时对告白也举行了过滤。用小偷程序的长处有:不必保护网站,由于小偷程序中的数据来自其他网站,它将跟着该网站的更新而更新;能够节俭服务器资本,一样平常小偷程序就几个文件,一切网页内容都是来自其他网站。弱点有:不不乱,假如方针网站堕落,程序也会堕落,并且,假如方针网站举行晋级保护,那末小偷程序也要举行响应修正;速率,由于是远程挪用,速率和在当地服务器上读取数据比起来,一定要慢一些。
(二)事例上面就XMLHTTP在ASP中的使用做个复杂申明
<%
经常使用函数
1、输出url方针网页地点,前往值getHTTPPage是方针网页的html代码
functiongetHTTPPage(url)
dimHttp
setHttp=server.createobject("MSXML2.XMLHTTP")
Http.open"GET",url,false
Http.send()
ifHttp.readystate4then
exitfunction
endif
getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
sethttp=nothing
iferr.number0thenerr.Clear
endfunction
2、转换乱玛,间接用xmlhttp挪用有中笔墨符的网页失掉的将是乱玛,能够经由过程adodb.stream组件举行转换
FunctionBytesToBstr(body,Cset)
dimobjstream
setobjstream=Server.CreateObject("adodb.stream")
objstream.Type=1
objstream.Mode=3
objstream.Open
objstream.Writebody
objstream.Position=0
objstream.Type=2
objstream.Charset=Cset
BytesToBstr=objstream.ReadText
objstream.Close
setobjstream=nothing
EndFunction
上面试着挪用http://www.3doing.com/earticle/的html内容
DimUrl,Html
Url="http://www.3doing.com/earticle/"
Html=getHTTPPage(Url)
Response.writeHtml
%>
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。 |
|