中国第一Ajax站长门户:www.okajax.com   虚拟主机 域名注册 云主机

AJAX跨域访问出现'没有权限'的错误 - okajax.com - Ajax中国

我要投稿 会员登陆 RSS订阅 本站推荐:
您的位置主页 > Ajax技术 > Ajax问题解答 > AJAX跨域访问出现'没有权限'的错误

AJAX跨域访问出现'没有权限'的错误

2009-04-23    文章来源:互联网    浏览次数:

很多人在使用AJAX调用别人站点内容的时候,JS会提示"没有权限"错误,这是XMLHTTP组件的限制-安全起见禁止访问非同域的网站,下面一个例子来访问http://www.google.cn,

  1. <script type="text/javascript"> 
  2. function createobj() {  
  3. if (window.ActiveXObject) {  
  4.          return new ActiveXObject("Microsoft.XMLHTTP");  
  5.      }  
  6.      else if (window.XMLHttpRequest) {  
  7.          return new XMLHttpRequest();  
  8.      }  
  9. }  
  10.  
  11. function getWebPage(url) {  
  12.   var oBao=createobj();  
  13.   var my_url=url  
  14.   oBao.open('get',my_url,false);   
  15.   oBao.onreadystatechange=function(){  
  16.        if(oBao.readyState==4){  
  17.             if(oBao.status=<script type="text/javascript"> 
  18. function createobj() {  
  19. if (window.ActiveXObject) {  
  20.          return new ActiveXObject("Microsoft.XMLHTTP");  
  21.      }  
  22.      else if (window.XMLHttpRequest) {  
  23.          return new XMLHttpRequest();  
  24.      }  
  25. }  
  26.  
  27. function getWebPage(url) {  
  28.   var oBao=createobj();  
  29.   var my_url=url  
  30.   oBao.open('get',my_url,false);   
  31.   oBao.onreadystatechange=function(){  
  32.        if(oBao.readyState==4){  
  33.             if(oBao.status==200){  
  34.               var returnStr=oBao.responseText;  
  35.               document.write(returnStr);  
  36.             }else{  
  37.               document.write("未找到您输入的地址或服务器505错误!");  
  38.             }  
  39.        }  
  40.   }  
  41.   oBao.send(null);   
  42. }  
  43. getWebPage('http://www.google.cn');  
  44. </script> 
  45. =200){  
  46.               var returnStr=oBao.responseText;  
  47.               document.write(returnStr);  
  48.             }else{  
  49.               document.write("未找到您输入的地址或服务器505错误!");  
  50.             }  
  51.        }  
  52.   }  
  53.   oBao.send(null);   
  54. }  
  55. getWebPage('http://www.google.cn');  
  56. </script> 

保存这段代码到test.html,在本地直接用IE打开没问题,但将该段代码上传到服务器后,问题出现了--JS提示"没有权限"错误!!!这该如何解决呢?

下面思考一下:既然不能访问非同域的,只能访问同域的地址了,同域的动态文件怎么获取非同域网页内容呢?我们还是想到的AJAX,只不过这个AJAX是在服务器端执行.

大体思路是这样的:首先将URL用AJAX提交给自己站内的文件,例如getPage.asp---在getPage.asp再次通过服务器XMLHTTP来访问提交来的URL---将获取的内容返回给提交URL的页----显示内容

下面开始组织代码,首先是test.html文件

 

  1. <script type="text/javascript"> 
  2. function createobj() {  
  3. if (window.ActiveXObject) {  
  4.          return new ActiveXObject("Microsoft.XMLHTTP");  
  5.      }  
  6.      else if (window.XMLHttpRequest) {  
  7.          return new XMLHttpRequest();  
  8.      }  
  9. }  
  10.  
  11. function getWebPage(url) {  
  12.   var oBao=createobj();  
  13.   var my_url="getpage.asp?url="+escape(url);  
  14.   oBao.open('get',my_url,false);   
  15.   oBao.onreadystatechange=function(){  
  16.        if(oBao.readyState==4){  
  17.             if(oBao.status==200){  
  18.               var returnStr=oBao.responseText;  
  19.               document.write(returnStr);  
  20.             }else{  
  21.               document.write("未找到您输入的地址或服务器505错误!");  
  22.             }  
  23.        }  
  24.   }  
  25.   oBao.send(null);   
  26. }  
  27. getWebPage('http://www.google.cn');  
  28. </script> 
  29.  
  30. 再就是getpage.asp文件(注意:要以UTF-8格式保存本文件,防止乱码),如下:  
  31.  
  32.  
  33. <%  
  34. response.charset="UTF-8" 
  35. reg="\<meta.+ charset= {0,}([^\"" \>\/]*).+\/{0,1}\>" 
  36. '函数名:GetResStr  
  37. '作用:获取指定URL的HTML代码  
  38. '参数:URL-要获取的URL  
  39. function GetResStr(URL)  
  40. err.clear  
  41. dim ResBody,ResStr,PageCode,ReturnStr  
  42. Set Http=createobject("MiCROSOFT.XMLHTTP")   
  43. Http.open "GET",URL,False   
  44. Http.Send()   
  45. If Http.Readystate =4 Then   
  46.   If Http.status=200 Then  
  47.     ResStr=http.responseText  
  48.     ResBody=http.responseBody  
  49.     PageCode=GetCode(ResStr,reg)  
  50.     ReturnStr=BytesToBstr(http.responseBody,PageCode)  
  51.     GetResStr=ReturnStr 
  52.   End If   
  53. End If   
  54. End Function  
  55.  
  56. '函数名:BytesToBstr  
  57. '作用:转换二进制数据为字符  
  58. '参数:Body-二进制数据,Cset-文本编码方式  
  59. Function BytesToBstr(Body,Cset)   
  60.   Dim Objstream   
  61.   Set Objstream = CreateObject("adodb.stream")   
  62.   objstream.Type = 1   
  63.   objstream.Mode =3   
  64.   objstream.Open   
  65.   objstream.Write body   
  66.   objstream.Position = 0   
  67.   objstream.Type = 2   
  68.   objstream.Charset =Cset   
  69.   BytesToBstr = objstream.ReadText   
  70.   objstream.Close   
  71.   set objstream = nothing   
  72. End Function  
  73.  
  74. '函数名:GetCode  
  75. '作用:转换二进制为字符  
  76. '参数:str-待查询字符串,regstr-正则表达式  
  77. Function GetCode(str,regstr)  
  78. Dim Reg,serStr  
  79. set Regnew RegExp  
  80. Reg.IgnoreCase = True 
  81. Reg.MultiLine = True 
  82. Reg.Pattern =regstr 
  83. if Reg.test(str) then '若查询到匹配项  
  84.    Set Cols = Reg.Execute(str)  
  85.    serStr=Cols(0).SubMatches(0) '使用匹配到的第一个匹配项  
  86. else '否则给个默认值gb2312,有点省懒法,如果页面没给出编码格式,想知道确实有点麻烦  
  87.    serStr="gb2312" 
  88. end if  
  89. GetCode=serStr 
  90. end function  
  91.  
  92. dim url:url=request.querystring("url")  
  93. response.write GetResStr(URL)  
  94. %> 

代码组织完毕,实验下,成功提取http://www.google.cn的内容!!!!!这样就可以解决"没有权限"的问题了。 其实,单纯一个getpage.asp一样能获取,不过不能像js那样动态的处理DOM。

还有一个问题,如果你用第一种方法访问http://www.baidu.com会出现乱码,因为baidu编码为GB2312,而XMLHTTP返回的是UTF-8编码格式。用第二种方法就不会出现这样的问题了,只要定义了编码格式的站点就能正常返回信息(这里不能包括一些使用特别编码的站点)。

文章评论(查看全部)

看不清楚?单击换一张。
loading.. 评论加载中....
关于我们 - 广告服务 - 版权隐私 - 免责声明 - RSS地图 - 网站地图 - 使用帮助 - 返回顶部