为什么xmlhttp没有权限？？？(100分)

<SCRIPT LANGUAGE="vbScript">
'获取地址
dim sUrl
sUrl="http://www.90live.com/chat/news.xml"
function getContentByUrl(url)
'建立对象
set oXmlHttp = CreateObject("MSXML2.XMLHTTP")
oXmlHttp.open "GET",url,false
oXmlHttp.send

getContentByUrl =oXmlHttp.responseXML.xml
set oXmlHttp=nothing
end function
msgbox getContentByUrl(surl)
</SCRIPT>
提示没有权限
但改成asp脚本却可以
<%
'获取地址
dim sUrl

sUrl="http://www.90live.com/chat/news.xml"
function getContentByUrl(url)

'建立对象
set oXmlHttp = CreateObject("MSXML2.XMLHTTP")

oXmlHttp.open "GET",url,false
oXmlHttp.send

getContentByUrl =oXmlHttp.responseXML.xml
set oXmlHttp=nothing
end function
response.write getContentByUrl(surl)
%>
我已经试过用Microsoft.xmlhttp也不行！！！！！！！！！！
我在想，为什么asp可以，用vbscript却不可以？？？？？？？？很不明白啊！！
大家帮我测试一下，测试前先把ＩＥ的安全设置中的“通过域访问数据资源”设为禁用。