bytesToBSTR轉(zhuǎn)換編碼的時(shí)候提示錯(cuò)誤,經(jīng)過(guò)比較發(fā)現(xiàn)其他的asp小偷程序里的代碼都是Responsebody,分析后,發(fā)現(xiàn)body返回來(lái)的是二進(jìn)制數(shù)據(jù)而
不是像ResponseText或ResponseXml那樣返回字符或dom對(duì)象.
ajax的asp代理函數(shù)介紹
send_request(url) ,url為地址
服務(wù)器端代碼如下帶自動(dòng)判斷所有字符編碼,已測(cè)試 日語(yǔ) 韓語(yǔ) 繁體
代碼如下:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>XMLHTTP</title>
</head>
<%
Server.ScriptTimeout=9999999;
function send_request(url) {
var codedtext;
http_request = Server.CreateObject("Microsoft.XMLHTTP");
http_request.Open("GET",url,false);
http_request.Send(null);
if (http_request.ReadyState == 4){
//自動(dòng)判斷編碼開(kāi)始
var charresult = http_request.ResponseText.match(/CharSet=(\S+)\">/i);
if (charresult != null){
var Cset = charresult[1];
}else{Cset = "gb2312"}//對(duì)獲取不到的網(wǎng)站采用gb2312編碼,可自行更改
//自動(dòng)判斷編碼結(jié)束
codedtext = bytesToBSTR(http_request.Responsebody,Cset);
}else{
codedtext = "Erro";
}
return(codedtext);
}
function bytesToBSTR(body,Cset){
var objstream;
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;
return(bytesToBSTR);
}
%>
<body>
<% Response.Write(send_request("http://www.daum.net")) %>
</body>
</html>
聲明:本網(wǎng)頁(yè)內(nèi)容旨在傳播知識(shí),若有侵權(quán)等問(wèn)題請(qǐng)及時(shí)與本網(wǎng)聯(lián)系,我們將在第一時(shí)間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com