оболочка Windows - как определить текущее местоположение файла сценария?

Я пробую файл оболочки Windows, который будет вставлен в папку, где он будет анализировать содержимое папок.

Теперь я хотел бы знать, как я могу определить текущий путь? то есть место, где размещается файл vbs с помощью FileSystemObject?

Установите objFSO = CreateObject ("Scripting.FileSystemObject")


windows vbscript windows-shell
person Anil Namde    schedule 22.02.2010    source источник

Ответы (2)


arrow_upward
2
arrow_downward

Вы можете получить это от WScript.ScriptFullName. Просто удалите имя файла с конца (бит после последней обратной косой черты). Обычно я использую JScript для скриптов, но в IIRC VBScript есть функция InStrRev, которая поможет вам найти последнюю обратную косую черту. Или: создайте объект File для пути WScript.ScriptFullName, а затем используйте его ParentFolder собственности. Что-то вроде (непроверено):

Dim objFSO
Dim objFile
Dim objFolder

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(WScript.ScriptFullName)
Set objFolder = objFile.ParentFolder
person T.J. Crowder    schedule 22.02.2010

arrow_upward
1
arrow_downward

Чтобы получить только полный путь без расширения, я использую Replace(WScript.ScriptFullName, WScript.ScriptName, ""), чтобы просто указать путь к файлу

person Bobby    schedule 22.02.2010