我想在客户端使用JAVASCRIPT将某一个网页中的内容使用XMLHTTP,弄下来.

<% @Language="JavaScript" %>
<%
function GetSource(url)
{
    var oXmlHttp = Server.CreateObject("Microsoft.XMLHTTP");
    oXmlHttp.open("GET",url, false);
    oXmlHttp.send()
    var oStream = Server.CreateObject("ADODB.Stream");
    if(oStream == null)
        Response.Write("您的机器不支持ADODB.Stream.")
    else
    {
        oStream.Type=1;
        oStream.Mode=3;
        oStream.Open() ;
        oStream.Write(oXmlHttp.responseBody);
        oStream.Position= 0;
        oStream.Type= 2;
        oStream.Charset="gb2312";
        var result= oStream.ReadText();
        oStream.Close();
        oStream = null;
        return result;
    }
}
Response.Write(GetSource("http://61.156.42.106/test/qixiang.php"))
%>

解决方案 »

  1.   

    function weatherReport()
    {
         var xml = new ActiveXObject("Microsoft.XMLHTTP");
         xml.open("GET", "http://61.156.42.106/test/qixiang.php", false);
         xml.send();
         alert(xml.responseText);//自己处理显示吧
    }
      

  2.   

    如果在客户端,可以这样子.<script language="javascript">
    function baoGetHTML(url)
    {
        var oHttp = new ActiveXObject("Microsoft.XMLHTTP");
        oHttp.open("GET", url, false);
        oHttp.send();
        SourceCode = bytes2BSTR(oHttp.responseBody);
        document.write(SourceCode);
        //bytes2BSTR(oHttp.responseBody)这就是网页的代码.
    }
    </script><script language="vbscript">
    Function bytes2BSTR(vIn)
        Dim strReturn,i,ThisCharCode,innerCode,Hight8,Low8,NextCharCode
        strReturn = ""
        For i = 1 To LenB(vIn)
            ThisCharCode = AscB(MidB(vIn,i,1))
            If ThisCharCode < &H80 Then
                strReturn = strReturn & Chr(ThisCharCode)
            Else
                NextCharCode = AscB(MidB(vIn,i+1,1))
                strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
                i = i + 1
            End If
        Next
        bytes2BSTR = strReturn
    End Function
    </script>
    <body onload="baoGetHTML('http://61.156.42.106/test/qixiang.php')">
      

  3.   

    XMLHTTP是IE几开始支持啊,我想首先由客户端来实现,客户端不支持XMLHTTP,再让服务器端实现.(如何在客户端判断支持不支持XMLHTTP啊.)
      

  4.   

    我使用JAVASCRIPT GET自己网站上的内容没问题,一GET那个天气预报就提示没权限啊.
      

  5.   

    <script language="javascript">
    function baoGetHTML(url)
    {
        try{
            var oHttp = new ActiveXObject("Microsoft.XMLHTTP");
            oHttp.open("GET", url, false);
            oHttp.send();
            SourceCode = bytes2BSTR(oHttp.responseBody);
            document.write(SourceCode);
            //bytes2BSTR(oHttp.responseBody)这就是网页的代码.
        }catch(e){
            alert("不支持该组件");
            //.....
        }
    }
    </script>
      

  6.   

    我使用JAVASCRIPT GET自己网站上的内容没问题,一GET那个天气预报就提示没权限啊.我也差不多，不过不太一样。
    我是在本机开发时get服务器上的网站没问题。
    可是上传到服务器上就不行了。
    说没有权限。