活到老学到老学习AJAX跨域（三）
学习AJAX其实有个很重要的应用，就是为了执行另外几个站点的ASP，返回结果。
真正用起来，发现2个问题，一向做DELPHI，接触ASP不多的我，的确问题大堆。
第一个问题：
VBS的变量传递给JS。。。通过学习发现很简单的。。。
先看下我大体实现方法：
<%
dimsSrv1Link
sSrv1Link="http://www.XXX.org/test1.asp?U=TESTUSER&M=111&E=222"
%>
<scripttype="text/javascript">
functionsynSvrData(str)
{
varxmlhttp;
if(str.length==0)
{
document.getElementById("txtHint").innerHTML="";
return;
}
//创建对象
if(window.XMLHttpRequest)
{//codeforIE7+,Firefox,Chrome,Opera,Safari
xmlhttp=newXMLHttpRequest();
}
else
{//codeforIE6,IE5
xmlhttp=newActiveXObject("Microsoft.XMLHTTP");
}
//处理ONREADYSTATECHANGE事件，我们这里只相应服务器反馈成功的
xmlhttp.onreadystatechange=function()
{
if(xmlhttp.readyState==4&&xmlhttp.status==200)
{
document.getElementById("txtHint").innerHTML=xmlhttp.responseText;
}
}
xmlhttp.open("GET",str,true);
xmlhttp.send();
}
</script>
上面这段代码的意思就是用AJAX实现访问一个ASP，并返回结果。
<scripttype="text/javascript"> varjsSvr='<%=sSrv1Link%>'; synSvrData(jsSvr) </script>
看到没？这个才是关键：
varjsSvr='<%=sSrv1Link%>';
js使用VBS变量，为什么要这样？因为加密串那些都是VBS生成的。
本地测试OK，现在把访问文件换成其他服务器上的。。。
sSrv1Link="http://www.XXX2.org/test1.asp?U=TESTUSER&M=111&E=222"
意思就是跨域！！！
这时候问题来了。。。代码执行后无返回，后来发现不是不返回，是XXX2服务器不响应！
发现问题出现在test1.asp这个文件上！！！对！你没看错！
跨域请求，顾名思义，就是一个站点中的资源去访问另外一个不同域名站点上的资源。
以下两端摘抄：
随着Web2.0和SNS的兴起，Web应用对跨域访问的需求也越来越多，但是，在脚本中进行跨域请求是受安全性限制的，Web开发人员迫切需要提供一种更安全、方便的跨域请求方式来融合（Mashup）自己的Web应用。这样做的一个好处就是可以将请求分摊到不同的服务器，减轻单个服务器压力以提高响应速度；另外一个好处是可以将不同的业务逻辑分布到不同的服务器上以降低负载。
值得庆幸的是，跨域请求的标准已经出台，主流浏览器也已经实现了这一标准。W3C工作组中的WebApplicationsWorkingGroup（Web应用工作组）发布了一个Cross-OriginResourceSharing（跨域资源共享，该规范地址：http://www.w3.org/TR/access-control/和http://dev.w3.org/2006/waf/access-control/）推荐规范来解决跨域请求的问题。该规范提供了一种更安全的跨域数据交换方法。具体规范的介绍可以访问上面提供的网站地址。值得注意的是：该规范只能应用在类似XMLHttprequest这样的API容器内。IE8、Firefox3.5及其以后的版本、Chrome浏览器、Safari4等已经实现了Cross-OriginResourceSharing规范，已经可以进行跨域请求了。Cross-OriginResourceSharing的工作方式是通过添加HTTP头的方法来判断哪些资源允许Web浏览器访问该域名下的信息。然而，对于那些HTTP请求导致用户数据产生副作用的请求方法（特别是对于除了GET、某些MIME类型的POST之外的HTTP方法），该规范要求浏览器对请求进行“预先验”，通过发送HTTP的OPTIONS请求头询问服务器有哪些支持的方法，在征得服务器的同意后，再使用实际的HTTP请求方法发送实际的请求。服务器也可以通知客户端是否需要将验证信息（如Cookie和HTTPAuthentication数据）随同请求一起发送。
看了这么多，其实实现一句话：就是添加HTTP头！
先看看我们做测试用的原来的test1.asp
<%
sUser=request.QueryString("U")
response.write("XXX.org:"&sUser)
%>
下面添加跨域访问：
<%
response.AddHeader"Access-Control-Allow-Origin","http://www.XXX2.org"
sUser=request.QueryString("U")
response.write("XXX2.org:"&sUser)
%>
response.AddHeader"Access-Control-Allow-Origin","http://www.XXX2.org"对了，就这么一句话，跨域完成了，你再测试下，是不是OK了？