Ajax跨域代理访问网络资源的实现代码_应用技巧_

<%
Response.charset="utf-8"
dim url,method,data,charset
url =Request.Form("targeturl")
method =Request.Form("method")
data =Request.Form("data")
charset = Request.Form("charset")
if charset = "" then charset = "GB2312"
response.Write SmartHttp(url,method,data).send().gettext(charset)
set myhttp = nothing
%>