在网页制作中的“MSXML2.XMLHTTP”对象的“onreadystatechange”属性问题

例子 Dim AVBAX Set AVBAX=CreateObject("MSXML2.XMLHTTP") '引用MSXML2.XMLHTTP对象 Function send_msg() AVBAX.Open "get", "Server.asp?num="+num.value, False '设置受理消息的网页 AVBAX.Send() '发送 AVBAX.OnReadyStateChange=call_back '指明回调函数是call_back End Function Function call_back() Window.Alert AVBAX.ResponseText '当服务器返回消息后，用提示框输出返回信息 End Function ※但是在接收到服务器返回的信息后，浏览器提示 OnReadyStateChange 类型不匹配，这应如何是好？

<script type="text/vbscript"> Dim AVBAX Set AVBAX=CreateObject("Microsoft.XMLHTTP") Function send_msg() AVBAX.onreadystatechange = getRef("call_back") AVBAX.Open "get", "Server.asp", False '设置受理消息的网页 AVBAX.Send null '发送 End Function Function call_back() //Window.Alert AVBAX.ResponseText '当服务器返回消息后，用提示框输出返回信息 msgbox(AVBAX.responseText) End Function </script> VB脚本段代码。。其中的server.asp内容为 <% response.write "Hello" %> --------------------- WIN2003+IE7测试通过。

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息