VBScript 不会移动某些文件

Question

我编写了一个 VBScript，它可以帮助我在每次桌面变得凌乱时整理桌面。

它可以很好地根据应用程序的扩展名和名称移动我的文件和快捷方式。但是，我有一些不会移动的应用快捷方式链接。实际上 vbs 脚本甚至不会用这个基本脚本看到它们

Set FSO = CreateObject("Scripting.FileSystemObject")    
dir = CreateObject("Scripting.FileSystemObject").GetParentFolderName(WScript.ScriptFullName)
Set folder = FSO.GetFolder(dir)
Set files = folder.Files

For Each file in files
    MsgBox file.Name
Next

有问题的文件都是 iTunes、VLC、Google Chrome 和 WinRar 的快捷方式。

我可以检查一下为什么 vbs 甚至看不到这些文件吗？

Answer 1

您可以在桌面上看到两个文件夹的混合视图：

C:\Users\你的用户名\桌面

C:\Users\Public\Desktop

Public 通常是在应用安装期间创建快捷方式的地方，因此所有用户都拥有它们。在您的脚本中您只是在 YourUserName\Desktop 中查找文件，这就是脚本看不到这些快捷方式的原因。