Последнее свойство ParentFolder возвращает имя папки, которая содержит файл или папку.
VBScript:
Set FSO = CreateObject("Scripting.FileSystemObject")
Set file1 = FSO.GetFile(WScript.ScriptName)
‘получаем файл текущего сценария
PFolder = file1.ParentFolder
MsgBox "Сценарий " + WScript.ScriptName + " находится в папке " _
+ Pfolder
JScript:
var FSO = new ActiveXObject("Scripting.FileSystemObject");
var file1 = FSO.GetFile(WScript.ScriptName);
//получаем текущий сценарий
PFolder = file1.ParentFolder;
//определяем родительский каталог
WScript.Echo("Сценарий ",WScript.ScriptName, " находится в папке ", PFolder);
Назад по тексту | Содержание | Вперед по тексту
О проекте | История | E-mail |
#bn { DISPLAY: block } #bt { DISPLAY: block }