当前位置：首页 → 问答吧 → 【推荐】Js+Xml:不刷新页面获取对应网址的网页中内容并显示(支持中文)

【推荐】Js+Xml:不刷新页面获取对应网址的网页中内容并显示(支持中文)

时间：2004-02-11

来源：互联网

<INPUT TYPE="text" NAME="url"><INPUT TYPE="button" onclick=get() value=get>
<div id=yyyy style='width:400;height:500;border:5px'></div>

<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>
<script language="JScript">
function get(){
var xmlhttp=new ActiveXObject("Msxml2.xmlhttp")
xmlhttp.open("GET",url.value,false)
xmlhttp.send()
var str = bytes2BSTR(xmlhttp.ResponseBody)

yyyy.innerHTML=str;
}
</script>

作者: yjc2020 发布时间: 2004-02-11

太好了,不过如果我只要筛选其中的内容,该怎么做呢?

作者: hotson 发布时间: 2005-04-04

用正则表达式处理取得的内容。
你问的这个算是信息采集系统了，可以用这个做关键字在网上查一下相关的资料。

作者: lilila 发布时间: 2005-04-04

好帖,但可不可以簡單介紹一下使用方法嗎?

作者: 堅．．．发布时间: 2005-04-04

这是JS????

作者: lly365 发布时间: 2005-04-12

东西不错.
呵呵. 主要是XMLHTTP 和 VBS 的字符串处理函数.

作者: ※潇洒※ 发布时间: 2005-04-14

老大,可以解釋一下怎樣使用嗎?

作者: 堅．．．发布时间: 2005-04-25

vb处理字节太慢了........我处理sina的主页会s..........
我一般用innerHTML=xmlhttp.responseText

作者: kkf009 发布时间: 2005-04-29

太好了！！！！

作者: dozb 发布时间: 2005-07-26

不错啊，我也想了解这方面的东西，可以提供一些比较适合初学者的XML的教程吗

——————这个怎么用啊？？？点击get后没返应啊

[ 本帖由 dpsing 最后编辑于 2005-7-26 13:14 ]

作者: dpsing 发布时间: 2005-07-26

iframe、JS、css文件代码读取不了。。

作者: 155120699 发布时间: 2005-07-26

好东西，不顶下都不好意思了

作者: 天雪发布时间: 2005-07-28

厉害,谢谢

作者: xfdipzone 发布时间: 2005-09-09

好东西就要收藏。。

作者: 娃娃龙发布时间: 2005-09-09

xmlhttp.open("GET",url.value,false)
怎样将form表单递交过去？

作者: s_x 发布时间: 2005-09-10

HUHU..网上搜索XMLHTTP

很多哇.

作者: 小男发布时间: 2005-09-10

<INPUT TYPE="text" NAME="url"><INPUT TYPE="button" onclick=get() value=get> <div id=yyyy style='width:400;height:500;border:5px'></div> <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> <script language="JScript"> function get(){ var xmlhttp=new ActiveXObject("Msxml2.xmlhttp") xmlhttp.open("GET",url.value,false) xmlhttp.send() var str = bytes2BSTR(xmlhttp.ResponseBody) yyyy.innerHTML=str; } </script>
提示：您可以先修改部分代码再运行

作者: trjf 发布时间: 2006-05-12

谢谢

作者: henanren 发布时间: 2006-05-13

我搞了一个晚上，想不到就怎么样的。晕死
感谢的很啊！哈哈哈哈。

作者: vfphome 发布时间: 2006-06-19

这种代码能用纯Jscript 编码吗？急盼中......

作者: vfphome 发布时间: 2006-06-19

QUOTE:

引用内容由 [i]s_x[/i] 发表于 2005-9-10 10:51
xmlhttp.open("GET",url.value,false)
怎样将form表单递交过去？

想传表单，有个变通的办法，就是在客户端生成xml ,再用send(xmldoc),就可以了。哈哈，全解决了，今天晚上爽啊。

作者: vfphome 发布时间: 2006-06-19