当前位置: 首页 > 图文教程 > 网络编程 > Javascript > html读出文本文件内容

Javascript
一个多浏览器支持的背景变暗的div并可拖动提示窗口功能的代码
CSS也可以把IE6弄死
ibm官方资料把应用程序从 Internet Explorer 迁移到 Mozilla
JavaScript修改css样式style
ext for eclipse插件安装方法
JavaScript对象模型-执行模型
定义select的边框颜色
js放大镜放大图片效果
javascript+css好多网站用的选星星实现打分功能的函数
javascript双向放大缩小广告代码
javascript四个方向无间隙滚动合集(多浏览器IE,firefox兼容)
Js的MessageBox效果代码
页面下沉抖动效果-网站HTTP连接没有效果-PC上有效果
javascript图片渐显效果代码
使用jquery给input和textarea设定ie中的focus
用JS实现一个页面多个css样式实现
用javascript做拖动布局的思路
javascript搜索自动提示功能的实现
多浏览器兼容的qq图片轮换效果javascript代码
javascript 建设银行登陆键盘

Javascript 中的 html读出文本文件内容


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 231 ::
收藏到网摘: n/a

<script language=vbscript>
Function bytes2BSTR(vIn)
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="JavaScript">
var xmlUrl = new ActiveXObject('Microsoft.XMLHTTP');
xmlUrl.Open('GET','1.txt');
xmlUrl.Send();
setTimeout('alert(bytes2BSTR(xmlUrl.ResponseBody))',2000);
</script>