Ajax跨域代理访问网络资源

解决Ajax跨域访问报“没有权限”的错误。
代码下载地址:

http://dev.mo.cn/upfiles/20101118175349810.rar

 

<!--#include file="smart.asp"-->
<%
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
%>