Page 14 - 2578
P. 14

if (CurSize > MaxSize) {
                                  MaxSize = CurSize;  // новий максимум
                                  MAXF = F.item();
                                // файл найбільшого розміру
                                    }
                                  // Переходимо до наступного файлу
                                  F.moveNext();
                                  i++; // к-ть проглянутих файлів
                                } // while
                                s = "У поточному каталозі "+ Fold.Name + " "+i+"
                            файлів.\n"+
                                  "Максимальний розмір має "+MaxF.Name+" = "+
                                  Math.round(MaxSize/1024) + " Кб";
                                WScript.echo(s);
                                Приклад  на  виведення  дат  створення  (зміни,  останнього
                            звернення) і атрибутів файлу, вказаного в командному рядку:
                                var file = "C:\Autoexec.bat";
                                // файл автозавантаження
                                  // одержуємо параметри командного рядка - там ім'я
                            файлу
                                var objArgs = WScript.Arguments;
                                // колекція аргументів
                                if (objArgs.length > 0)
                                // к-ть аргументів > 0
                                  file = objArgs(0);
                                // отримуємо перший аргумент
                                  // Створення FileSystemObject для доступу до файлової
                            системи
                                var FSO =
                            WScript.CreateObject("Scripting.FileSystemObject");
                                  // перевірка існування файлу
                                if ( ! FSO.FileExists(file))
                                {
                                  WScript.Echo("Помилка:", file " не існує");
                                  WScript.Quit(1);
                                }
                                                           13
   9   10   11   12   13   14   15   16   17   18   19