获取当前目录

时间:2016-03-18 18:08:32

标签: vbscript

我试图让脚本读取脚本文件所在目录的内容,然后根据部分名称识别几个特定文件并压缩它们。但我无法让object.Files财产发挥作用。有人能告诉我这里有什么问题吗?

Set FSO = CreateObject("Scripting.FileSystemObject")
objFolder = FSO.GetParentFolderName(WScript.ScriptFullName)
Set allFiles = objFolder.Files
For Each objFile in allFiles
    Wscript.Echo objFile.Name
Next

1 个答案:

答案 0 :(得分:3)

objFolder = FSO.GetParentFolderName(WScript.ScriptFullName)

将一个Path(String)分配给objFolder(检测到类型前缀欺诈!)。使用

Set objFolder = FSO.GetFolder(FSO.GetParentFolderName(WScript.ScriptFullName))

代替。