Я использую Shell.Application
объект, который позволяет мне созданию сценария zip-файла.
Но для этого для работы мне нужно к полному пути zip-файла. File.zip
не работает. Мне нужно c:\the\full\path\file.zip
, даже если сценарий работает в рамках того же каталога, где файл найден.
Как я могу получить полный путь файла в VBScript?
Что-то как %~fI
расширение в оболочке cmd.exe.
В Scripting.FileSystemObject есть метод GetAbsolutePathName, который делает следующее.
Вот что сработало у меня:
Dim folderName
folderName = "..\.."
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Dim fullpath
fullpath = fso.GetAbsolutePathName(folderName)
WScript.Echo "folder spec: " & folderName
WScript.Echo "fullpath: " & fullpath
Например
Set objFS=CreateObject("Scripting.FileSystemObject")
Set objArgs = WScript.Arguments
strFile= objArgs(0)
Set objFile = objFS.OpenTextFile(strFile)
Set objFile = objFS.GetFile(strFile)
WScript.Echo objFile.Path
в командной строке
c:\test> cscript //nologo myscript.vbs myfile