Add Url To Favorites

最新推荐文章于 2025-09-26 09:04:53 发布

原创最新推荐文章于 2025-09-26 09:04:53 发布 · 831 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#url #website

本文介绍了一种使用VBScript来创建桌面快捷方式的方法，通过脚本可以为指定的网站地址生成桌面图标，便于快速访问特定网页。

set WshShell = WScript.CreateObject("WScript.Shell")
   strFavorites = WshShell.SpecialFolders("Favorites")
set oUrlLink = WshShell.CreateShortcut(strFavorites & "/XXXX.url")
   oUrlLink.TargetPath = "http://dgsi.dg.gov.cn/"
   oUrlLink.Save
set oUrlLink = WshShell.CreateShortcut(strFavorites & "/XXXXX.url")
   oUrlLink.TargetPath = "http://ldj.dg.gov.cn/"
   oUrlLink.Save
WScript.echo "URL had been added!"
set oUrlLink = nothing
set Wshshell = nothing
WScript.quit
--------------------------------------------------------------------------------------------------------------------------------------------
Remark: XXXXX is the website's name