unction ShowFileAccessInfo(filespec) // filespec - путь к файлу
{
  var fso, f, s;
  fso = new ActiveXObject("Scripting.FileSystemObject");
  f = fso.GetFile(filespec);
  s = f.Path.toUpperCase() + "<br>";
  s += "Created: " + f.DateCreated + "<br>";
  s += "Last Accessed: " + f.DateLastAccessed + "<br>";
  s += "Last Modified: " + f.DateLastModified  
  return(s);
}