论坛小偷

2025-05-26 00:05:21

推荐回答（6个）

回答1：

这个类似与新闻小偷，我以前写过。可以利用asp组建来获得需要页面的源代码，然后通过分析源代码的内容写一个处理程序，取出想要的数据。然后动态的显示到自己的页面上。根本就不需要
下面是两个函数，函数的返回值是获得网页的源代码：
参数当然就是网页的url,调用第一个函数。
Public Function getHtmlPage(strUrl)
On Error Resume Next
Dim objHttp
Set objHttp = Server.CreateObject("Microsoft.XMLHTTP")

objHttp.Open "GET", strUrl, False
objHttp.Send()
If objHttp.ReadyState <> 4 Then
Exit Function
End If
getHtmlPage = BytesToBstr(objHttp.ResponseBody)
Set objHttp = Nothing
If Err.Number <> 0 Then
Err.Clear
getHtmlPage = "

该服务器不支持Microsoft.XMLHTTP组件！

"
End If
On Error Goto 0
End Function

Public Function BytesToBstr(vIn)
On Error Resume Next
Dim objStream
Set objStream = Server.CreateObject("ADODB.Stream")
BytesToBstr = ""
With objStream
.Type = 1
.Mode =3
.Open
.Write vIn
.Position = 0
.Type = 2
.Charset = "GB2312"
BytesToBstr = .ReadText
.Close
End With
Set objStream = Nothing
If Err.Number <> 0 Then
Err.Clear
BytesToBstr = "

该服务器不支持ADODB.Stream组件！

"
End If
On Error Goto 0
End Function

回答2：

如果技术上不行的话，还是自己慢慢贴吧。

回答3：

可以去黑客基地看看相关的文章

回答4：

迅雷不是可以下载所有链接的吗,试试嘛

回答5：

应该没有这么简单的

回答6：

这不是论坛小偷啊,只是转帖