var fso, f, ts, s;
   var ForReading = 1;
   var TristateUseDefault = -2;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   f = fso.GetFile("test1.txt");
   ts = f.OpenAsTextStream(ForReading, TristateUseDefault);
   s = ts.ReadLine( );
   alert(s);
   ts.Close( );