Vbscript 正在获取当前目录中的文件列表

Vbscript 正在获取当前目录中的文件列表,vbscript,Vbscript,我试图获取一个脚本来读取脚本文件所在目录的内容,然后根据部分名称识别几个特定的文件并将其压缩。但是我无法使object.Files属性正常工作。有人能告诉我这里怎么了吗 Set FSO = CreateObject("Scripting.FileSystemObject") objFolder = FSO.GetParentFolderName(WScript.ScriptFullName) Set allFiles = objFolder.Files For Each objFile in a

我试图获取一个脚本来读取脚本文件所在目录的内容,然后根据部分名称识别几个特定的文件并将其压缩。但是我无法使
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
你的

为objFolder分配路径(字符串)(检测到类型前缀欺诈!)。使用


相反。

谢谢。这是有道理的
objFolder = FSO.GetParentFolderName(WScript.ScriptFullName)
Set objFolder = FSO.GetFolder(FSO.GetParentFolderName(WScript.ScriptFullName))