跨站点访问对象(解决问题后另给1000分！)

Question

每次运行到disp()函数IE都报告说  拒绝访问

Answer 1

那我能否在a.html中调用b.html某个button的click方法？

Answer 2

一种变通的方式：
a. 使用xmlhttp方法获得另一站点的页面内容
b. 将内容写入本页面中一个隐藏的iframe
c. 从iframe读取想要得内容try:<FORM METHOD=POST ACTION="***" name="moonpiazza">
<INPUT TYPE="text" name='sURL' value="http://www1.baidu.com/baidu?word=xmlseltree" size='80'>
<INPUT TYPE="button"  value="读取数据" onclick="GetData()">
</FORM>
<div id='oDiv'></div>
<iframe name='ExternalData' src='about;blank' height='0' width='0'></iframe><SCRIPT LANGUAGE="vbScript">
Function GetData()
Dim sURL, sHtmlStr, sShowStr sURL = document.moonpiazza.sURL.value
window.open(sURL)
oDiv.innerHTML = "正在读取数据..." sHtmlStr = GetHtml(sURL)
ExternalData.document.write(sHtmlStr)  oDiv.innerHTML = "" 
sShowStr = ""
sShowStr = sShowStr & "word:" & ExternalData.document.f1.word.value & chr(13)
sShowStr = sShowStr & "tn:" & ExternalData.document.f1.tn.value & chr(13)
sShowStr = sShowStr & "ie:" & ExternalData.document.f1.ie.value & chr(13)
alert( sShowStr )
End Function
Function GetHtml(p_sURL) dim sHtmlStr
dim oXMLHttp

Set oXMLHttp = createObject("Microsoft.XMLHTTP") Call oXMLHttp.Open("get", p_sURL, false)
Call oXMLHttp.Send("")
sHtmlStr = GetBytes2BSTR( oXMLHttp.responseBody ) Set oXMLHttp = nothing 
GetHtml = sHtmlStr
End FunctionFunction GetBytes2BSTR(p_sHtmlStr)
dim sReturnStr
dim i,n    sReturnStr = ""
n = LenB(p_sHtmlStr)    For i = 1 To n
dim sCharCode
dim sNextCharCode        sCharCode = AscB( MidB(p_sHtmlStr, i, 1) )        If (sCharCode < &H80) Then
            sReturnStr = sReturnStr & Chr(sCharCode)
        Else
            sNextCharCode = AscB( MidB(p_sHtmlStr, i+1, 1) )
            sReturnStr = sReturnStr & Chr(CLng(sCharCode) * &H100 + CInt(sNextCharCode))
            i = i + 1
        End If
    Next    GetBytes2BSTR = sReturnStr
End Function
</SCRIPT>
:_)

Answer 3

注：上面程序本地运行可以，通过IIS解释运行，需要客户端IE设置允许“通过域访问数据资源”
浏览器默认不允许垮域访问
IE ==> internet选项 ==> 安全设置 ==> 自定义级别 ==> 启用"通过域访问数据资源"通过IIS解释运行：
可以改变逻辑,由A改变为B：
A. 客户端 ==> 外部数据源(URL) ==> 客户端得到返回数据
==>
B. 客户端 ==> 服务器端(获得URL) ==> 外部数据源(URL) ==> 服务器端得到返回数据,发送数据到客户端 ==> 客户端得到返回数据参考
http://expert.csdn.net/Expert/topic/1959/1959431.xml?temp=.8885004
:_)