VBScript 读取文件列表生成 TXT 文件

下面是一个使用 VBScript 脚本读取文件列表并生成 txt 文本的示例：

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile('filelist.txt', True)

strFolderPath = 'C:\YourFolderPath' ' 更改为要读取文件列表的文件夹路径

Set objFolder = objFSO.GetFolder(strFolderPath)
Set colFiles = objFolder.Files

For Each objFile In colFiles
    objFile.WriteLine objFile.Name
Next

objFile.Close

将上述代码保存为一个 .vbs 文件，然后将 strFolderPath 变量中的路径更改为你要读取文件列表的文件夹路径。执行该脚本后，将生成一个名为 filelist.txt 的文本文件，其中包含所选文件夹中的所有文件列表。