欢迎光临

木子屋

标题: ASP伪造REFERER实例

作者: dnawo

日期: 2008-02-27 01:30 PM

分类: 网络破解

内容: index.asp代码：
复制内容到剪贴板 程序代码<%
Function GetBody(weburl)
Set Retrieval = Server.CreateObject("MSXML2.XMLHTTP")
With Retrieval
.Open "Get", weburl, False, "", ""
.setRequestHeader "referer","http://www.hao123.com/"'想改什么就改什么
.Send
GetBody = .ResponseBody
End With
GetBody = BytesToBstr(GetBody,"GB2312")
Set Retrieval = Nothing
End Function
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
Response.Write(GetBody("http://www.mzwu.com/referer.asp"))
%>
referer.asp代码：
复制内容到剪贴板 程序代码<% =Request.ServerVariables("HTTP_REFERER") %>
看到了吧，referer.asp中显示的是"http://www.hao123.com/"，既然REFERER可以伪造，那阻止外部提交还有用吗？

+ 查看当前日志评论 (0)

登录

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 5.461 ms

返回

标题: ASP伪造REFERER实例

你没有权限发表评论

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 5.461 ms

返回

暂无评论

返回

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 5.617 ms

返回