如何通过VBscript或批处理创建位置快捷方式?

如何通过VBscript或批处理创建位置快捷方式?,vbscript,active-directory,Vbscript,Active Directory,我需要创建批处理或VBScript(用于广告)来创建仅用于位置的桌面快捷方式。例如,快捷方式是指向指定文件的快捷方式,但我需要只打开服务器位置的快捷方式\\server\shared folder考虑到它是一台Windows计算机,我建议您使用此VBScript片段 Dim FileName FileName = "Shortcut" Set shortcut = CreateObject("WScript.Shell").CreateShortcut(CreateObject("WScript

我需要创建批处理或VBScript(用于广告)来创建仅用于位置的桌面快捷方式。例如,快捷方式是指向指定文件的快捷方式,但我需要只打开服务器位置的快捷方式
\\server\shared folder

考虑到它是一台Windows计算机,我建议您使用此VBScript片段

Dim FileName
FileName = "Shortcut"
Set shortcut = CreateObject("WScript.Shell").CreateShortcut(CreateObject("WScript.Shell").SpecialFolders("Desktop") & + "\" + FileName + ".lnk")
shortcut.Description = "shortcut To a shared folder"
shortcut.TargetPath = "\\server\shared"
shortcut.Save

targetPath可以是任何类似文件夹、文件或可执行文件的东西。

考虑到它是一台Windows计算机,我建议您使用此VBScript片段

Dim FileName
FileName = "Shortcut"
Set shortcut = CreateObject("WScript.Shell").CreateShortcut(CreateObject("WScript.Shell").SpecialFolders("Desktop") & + "\" + FileName + ".lnk")
shortcut.Description = "shortcut To a shared folder"
shortcut.TargetPath = "\\server\shared"
shortcut.Save
targetPath可以是任何类似文件夹、文件或可执行文件的内容