Scripting.FileSystemObject和..lnk文件

使用WMI在文件夹中循环似乎也可以找到*.lnk文件。请尝试以下示例:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colFiles = objWMIService. _
    ExecQuery("Select * from CIM_DataFile where Drive = 'C:' And Path = '\\Temp\\'")
For Each objFile in colFiles
    Wscript.Echo objFile.Name 
Next

我希望这有帮助。

似乎我在创建测试环境时犯了一个错误,我创建了一个文件夹而不是一个文件。

现在起作用了。