Question

VBS创建快捷方式？

是文件、文件夹快捷方式，不是网页快捷方式！！
VBScript的，不是VB的~

Answer 1

set ws = CreateObject("WScript.Shell")
dt = ws.SpecialFolders("desktop")
set lnk = ws.CreateShortcut(dt & "\快捷方式指向创建该快捷方式的VBS文件.lnk")
lnk.TargetPath = WScript.ScriptFullName
lnk.Save