如何在用户桌面创建一个WEB页的快捷方式？

下面的代码即可完成要求的功能：

Set WshShell = Wscript.CreateObject("Wscript.Shell")
Wscript.echo WshShell.SpecialFolders("Desktop")
Set oShellLink = WshShell.CreateShortcut(WshShell.SpecialFolders("Desktop") & "\wsh.url")
oShellLink.TargetPath = "http://wsh.glazier.co.nz/frame.htm"
oShellLink.Save