Visual Basic Script


6_6_ Доступ к файлам и папкам - часть 3


     ShPath = Folder1.ShortPath;
     PathInfo = "Путь: " + LongPath + "\n" + "Путь DOS: " + ShPath;
     WScript.Echo(PathInfo);
 

         Последнее свойство 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


Copyright (C) 2000 - 2001 Alex Neverov

#bn { DISPLAY: block } #bt { DISPLAY: block }




Начало  Назад  Вперед



Книжный магазин