用XMLHTTP和ADODB.Stream读取源代码

用XMLHTTP和ADODB.oStream可以很方便地得到一个Url地址的源代码。而且效率高。

 1<script>
 2    var oXmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
 3    oXmlHttp.open("GET","http://dotnet.aspx.cc/content.aspx", false);
 4    oXmlHttp.send()
 5    var oStream = new ActiveXObject("ADODB.Stream");
 6    if(oStream == null)
 7        alert("您的机器不支持ADODB.Stream.")
 8    else
 9    {
10        oStream.Type=1;
11        oStream.Mode=3;
12        oStream.Open() ;
13        oStream.Write(oXmlHttp.responseBody);
14        oStream.Position= 0;
15        oStream.Type= 2;
16        oStream.Charset="gb2312";
17        var result= oStream.ReadText();
18        oStream.Close();
19        oStream = null;
20        alert( result);
21    }
22</script>
23
24