如何在VBScript中获取文件的完全限定路径?

时间:2010-01-24 23:14:00

标签: vbscript path

我正在使用Shell.Application对象,它允许我编写zip文件的脚本。

但为了使其工作,我需要完整的zip文件路径。 File.zip不起作用。即使脚本在找到文件的同一目录中运行,我也需要c:\the\full\path\file.zip

如何在VBScript中获取文件的完整路径?

类似于cmd.exe shell中的%~fI扩展。

2 个答案:

答案 0 :(得分:27)

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

答案 1 :(得分:5)

例如

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