这段代码是js的,我想问,为什么我最后那句输出lineCount 有问题

Question

脚本运行时库   AtEndOfLine 属性
请参阅
AtEndOfStream 属性应用于：TextStream 对象
语言
JScriptVBScript显示所有语言
如果文件指针正好位于 TextStream 文件中的行尾符之前，则返回true，否则返回 false。只读。object.AtEndOfLine
object 总是 TextStream 对象的名称。说明
AtEndOfLine 属性只能应用于打开用来读取的TextStream 文件；否则将产生错误。下面的代码演示了AtEndOfLine 属性的用法：[JScript]
function GetALine(filespec)
{
   var fso, a, s, ForReading;
   ForReading = 1, s = "";
   fso = new ActiveXObject("Scripting.FileSystemObject");
   a = fso.OpenTextFile(filespec, ForReading, false);
   while (!a.AtEndOfLine)
   {
      s += a.Read(1);
   }
   a.Close( );
   return(s);
}
[VBScript]
Function ReadEntireFile(filespec)
   Const ForReading = 1
   Dim fso, theFile, retstring
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set theFile = fso.OpenTextFile(filespec, ForReading, False)
   Do While theFile.AtEndOfLine <> True
      retstring = theFile.Read(1)
   Loop
   theFile.Close
   ReadEntireFile = retstring
End Function
请参阅
AtEndOfStream 属性应用于：TextStream 对象--------------------------------------------------------------------------------&copy; 2001 Microsoft Corporation. 保留所有权利。

Answer 1

很清楚
IE 里面要使用高级特性，还是需要 JScript 啊

Answer 2

不是有了吗，这位大哥已经写了function GetALine(filespec)
{
   var fso, a, s, ForReading;
   ForReading = 1, s = "";
   fso = new ActiveXObject("Scripting.FileSystemObject");
   a = fso.OpenTextFile(filespec, ForReading, false);
   while (!a.AtEndOfLine)
   {
      s += a.Read(1);
   }
   a.Close( );
   return(s);
}
你对照一下自己的程序，应该就明白了吧

Answer 3

关键问题，我不是要得到一行数据。这个我知道
我要得到文件只是里面一行中的一个某字段赋值给一个textfield而已

Answer 4

我想问下lineCount输出为什么会有问题
document.writeln(lineCount);
这句话我放在循环体内可以输出,为什么到外面就不行了
js我是边看资料边卖的,所以希望大家帮忙看看---------------------------------------------我试了一下，你的程序报了异常：输入超出文件尾
应该在循环的最后一次超了界
可能你的 ie 设置不敏感，没有报错
循环体最后一次出错，所以循环体外不能正常运行，循环体中前面几次会正常运行
while(s != null) 
改为
while(!ts.AtEndOfStream)应该会正常了我想 zhaoxiangyang 最初也是这个意思