<html>
<head>
<title>new page</title>
<script>
function GetHeader(src) {
var ForReading=1;
var fso=new ActiveXObject("Scripting.FileSystemObject");
var f=fso.OpenTextFile(src,ForReading);
return(f.ReadAll());
}
var arr=GetHeader("E://a.txt").split("/r/n");
for (int i = 0 ; i < arr.length; i++){
alert('第'+(i+1)+'行数据是:'+ arr[i]);
}
</script>
</head>
</html>
<head>
<title>new page</title>
<script>
function GetHeader(src) {
var ForReading=1;
var fso=new ActiveXObject("Scripting.FileSystemObject");
var f=fso.OpenTextFile(src,ForReading);
return(f.ReadAll());
}
var arr=GetHeader("E://a.txt").split("/r/n");
for (int i = 0 ; i < arr.length; i++){
alert('第'+(i+1)+'行数据是:'+ arr[i]);
}
</script>
</head>
</html>
本文提供了一个使用VBScript从本地文件系统读取文本文件并显示每一行内容的示例。通过创建一个ActiveX对象来操作文件,并将文件内容按行分割进行展示。
1182

被折叠的 条评论
为什么被折叠?



