最近用VBS模擬POST提交表單,發(fā)現(xiàn)遇到檢測(cè)Referer的頁(yè)面就不管用了。
在測(cè)試目錄寫了一個(gè)簡(jiǎn)單的referer.php,代碼如下
代碼如下:
<?php
if (!isset($_SERVER["HTTP_REFERER"]))
echo "No Referer";
else
echo $_SERVER["HTTP_REFERER"];
?>
如果直接點(diǎn)擊上面的鏈接,那么頁(yè)面會(huì)顯示referer頁(yè)面的鏈接。
代碼如下:
Set http = CreateObject("msxml2.xmlhttp")
http.open "GET","http://jb51.net/test/referer.php",False
http.setRequestHeader "Referer","http://jb51.net"
http.send
WScript.Echo http.responseText
但是如果我用VBS調(diào)用msxml2.xmlhttp組件訪問(wèn)這個(gè)頁(yè)面,返回的卻是No Referer。實(shí)在匪夷所思,難道我的代碼寫錯(cuò)了?
于是Google了一下“VBS偽造HTTP REFERER”,發(fā)現(xiàn)搜出來(lái)的內(nèi)容大部分和這篇文章一樣,不用看又是復(fù)制粘貼,你抄我的,我抄你的,抄來(lái)抄去不知道到底是誰(shuí)的,而且還是錯(cuò)的!
那篇文章第一個(gè)例子是ASP的
代碼如下:
dim http
set http=server.createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false
Http.setRequestHeader "Referer","http://www.fromdomain.cn/"
Http.send()
開始我還以為ASP下的VBS和我直接雙擊運(yùn)行的VBS不一樣,ASP下的比較牛逼,可以改Referer。為此我還專門裝了IIS測(cè)試,發(fā)現(xiàn)返回的照樣是No Referer。后來(lái)才看到下面的留言,“原諒我對(duì)asp不熟,給不了你什么幫助,自己查點(diǎn)其他資料參考一下吧”,“這我沒(méi)怎么玩asp了,代碼只是參考來(lái)的,asp的沒(méi)測(cè)試過(guò)”。
我真的不想罵人,不熟你寫也就算了,起碼測(cè)試一下吧,沒(méi)有測(cè)試過(guò)的代碼你也好意思貼上來(lái)?后來(lái)在千一網(wǎng)絡(luò)(這個(gè)網(wǎng)絡(luò)貌似不錯(cuò))看到一個(gè)比較靠譜的答案,Referer在ASP和Ajax中是無(wú)法通過(guò)設(shè)置Header來(lái)更改的。
怒了,既然xmlhttp組件不行,我用socket來(lái)寫總行了吧?。ㄗⅲ翰皇撬须娔X上都注冊(cè)了Winsock組件)
代碼如下:
Set socket = WScript.CreateObject("MSWinsock.Winsock","Winsock_")
socket.RemoteHost = "jb51.net"
socket.RemotePort = 80
socket.Connect
Do
WScript.Sleep 100
Loop
Sub Winsock_Connect()
data = "GET /test/referer.php HTTP/1.1" & vbCrLf &_
"Referer: http://jb51.net" & vbCrLf &_
"Host: jb51.net" & vbCrLf & vbCrLf
socket.SendData data
End Sub
Sub Winsock_DataArrival(bytesTotal)
socket.GetData str
WScript.Echo Utf8ToUnicode(str)
WScript.Quit
End Sub
Utf8ToUnicode函數(shù)比較長(zhǎng)就不貼出來(lái)了,以前的文章寫過(guò)。測(cè)試結(jié)果如下:
代碼如下:
HTTP/1.1 200 OK
Date: Thu, 04 Nov 2010 14:05:20 GMT
Server: Apache
Transfer-Encoding: chunked
Content-Type: text/html
f
http://jb51.net
0
可以肯定偽造Referer成功了,但是返回的結(jié)果好像有點(diǎn)奇怪,jb51.net前面和后面一行的f和0是什么東西啊?(其實(shí)用瀏覽器訪問(wèn)也是這樣返回的,只不過(guò)瀏覽器不顯示給我們看罷了)我猜想f是Referer字符串的長(zhǎng)度,但是搜了半天也找不到解釋。不管了,偽造成功就行,結(jié)果難看點(diǎn)就難看點(diǎn)吧。