Андрей Попов - Windows Script Host для Windows 2000/XP

/*******************************************************************/

/* Имя: CreateFile.js */

/* Язык: JScript */

/* Описание: Создание текстового файла и запись в него строки */

/*******************************************************************/

var FSO,f; //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Создаем на диске C: текстовый файл TestFile.txt

f = FSO.CreateTextFile("C:\\TestFile.txt", true);

//Записываем строку в файл

f.WriteLine("Привет!");

//Закрываем файл

f.Close();

/************* Конец *********************************************/

Параметры filespec или folderspec , используемые в методах, могут содержать групповые символы "?" и "*" в последнем компоненте пути для удаления сразу нескольких файлов/каталогов.

Если параметр force равен falseили не указан вовсе, то с помощью методов DeleteFileили DeleteFolderбудет нельзя удалить файл/каталог с атрибутом "только для чтения" (read-only). Установка для force значения trueпозволит сразу удалять такие файлы/каталоги.

При использовании метода DeleteFolderневажно, является ли удаляемый каталог пустым или нет — он удалится в любом случае

Если заданный для удаления файл/каталог не будет найден, то возникнет ошибка.

Для дисководов со съемными носителями метод DriveExistsвернет trueдаже в том случае, если носитель физически отсутствует. Для того чтобы определить готовность дисковода, нужно использовать свойство IsReadyсоответствующего объекта Drive.

В качестве примера использования метода DriveExistsприведем функцию ReportDriveStatus, которая возвращает информацию о наличии диска, передаваемого в эту функцию в качестве параметра (листинг 5.2).

function ReportDriveStatus(drv) {

var FSO, s ="" //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Проверяем наличие диска drv

if (FSO.DriveExists(drv)) s += "Диск " + drv + " существует.";

else s += "Диск " + drv + " не существует.";

return(s);

}

Функция ReportDriveStatusбудет возвращать информацию о наличии диска, передаваемого в эту функцию в качестве параметра.

Для иллюстрации работы этого метода предположим, что текущим каталогом является C:\MyDocuments\Reports. В табл. 5.3 приведены значения, возвращаемые методом GetAbsolutePathName, при различных значениях параметра pathspec .

Таблица 5.3.Варианты работы метода GetAbsolutePathName

Работу этого метода иллюстрирует сценарий BaseName.js, приведенный в листинге 5.3. В результате выполнения этого сценария на экран выводится диалоговое окно, в котором отражены полный путь к файлу и базовое имя, выделенное из этого пути (рис. 5.1).

Рис. 5.1.Полный путь к файлу и базовое имя для этого пути

/*******************************************************************/

/* Имя: BaseName.js */

/* Язык: JScript */

/* Описание: Создание текстового файла и запись в него строки */

/*******************************************************************/

var FSO, BaseName, SPath,s; //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Задаем путь к файлу

SPath="C:\\Мои документы\\letter.txt";

//Выделяем базовое имя файла (без расширения)

BaseName = FSO.GetBaseName(SPath);

//Выводим на экран путь и базовое имя

s="Путь: "+SPath+"\n";

s+="Базовое имя: "+BaseName;

WScript.Echo(s);

/************* Конец *********************************************/

Параметр drivespec в данном методе может задаваться одной буквой (например, " С"), буквой с двоеточием (" С:"), буквой с двоеточием и символом разделителя пути (" С:\\"). Для сетевого диска drivespec можно указывать в формате UNC (например, " Server1\\Programs").

Если параметр drivespec указывает на несуществующий диск или задан в неверном формате, то при выполнении метода GetDriveвозникнет ошибка.

Если вам требуется преобразовать строку, содержащую обычный путь к файлу или каталогу, в вид, пригодный для GetDrive, необходимо применять методы GetAbsolutePathNameи GetDriveName:

DriveSpec = GetDriveName(GetAbsolutePathName(Path))

Для иллюстрации работы этого метода запустим сценарий ParentFolder.js (листинг 5.4). В результате будет выведено диалоговое окно с полным путем к файлу и путь к родительскому каталогу этого файла (рис. 5.2).

Рис. 5.2.Полный путь к файлу и родительский каталог этого файла

/*******************************************************************/

/* Имя: ParentFolder.js */

/* Язык: JScript */

/* Описание: Определение родительского каталога для файла */

/*******************************************************************/

var FSO,ParentFolder,Spath,s; //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Задаем путь к файлу

SPath="C:\\Programs\\letter.txt";

//Определяем родительский каталог для файла letter.txt

ParentFolder = FSO.GetParentFolderName(SPath);

s="Путь: "+SPath+"\n";

s+="Родительский каталог: "+ParentFolder;

//Выводим на экран полный путь к файлу letter.txt

//и родительский каталог для этого файла

WScript.Echo(s);

/************* Конец *********************************************/

Параметр folderspec в этом методе является числом и может принимать значения, описанные в табл. 5.4.

Таблица 5.4.Значения параметра folderspec