我想知道是否可以通过多个目标创建快捷方式,因为我的代码不适用于3条路径。下面的代码和屏幕截图。
可以帮忙吗?谢谢大家
我想要一些东西,例如下面的屏幕截图(我已经手动完成)
C:\ Windows \ System32 \ notepad.exe“ C:\ Temp Logs \ app.vbs”“ C:\ Temp Logs \ try.bat”
Sub aa()
Dim sShortcutLocation As String
sShortcutLocation = "C:\Temp Logs\AA.lnk"
With CreateObject("WScript.Shell").CreateShortcut(sShortcutLocation)
.TargetPath = "C:\Windows\System32\notepad.exe ""C:\Temp Logs\app.vbs"""
.Arguments = "C:\Temp Logs\try.bat"
.Description = "Shortcut to the file"
.Save
End With
End Sub