最近在看關于wmi的書，深深感覺wscript的危害之大。這里將書上提到的一些應用的例程放上來，大家鑒賞一下，可

不要拿來做壞事喲。新建一個vbs腳本文件。鍵入下面的內容

call testwmi()

function testwmi()
dim objShell

set objShell = WScript.CreateObject("WScript.Shell")
dim strDesktop

strDesktop = objShell.SpecialFolders("Desktop")

'now, we can create shortcuts on the desktop
'let's do Internet Explorer

dim objShortcut

set objShortcut= objShell.CreateShortcut(strDesktop & "\IE.lnk")

?

???? objShortcut.TargetPath = "iexplore.exe"

???? objShortcut.WindowStyle = 1

???? objShortcut.Hotkey = "CTRL+SHIFT+I"

???? objShortcut.Description = "Launch Internet Explorer"

???? objShortcut.WorkingDirectory = strDesktop

???? objShortcut.Save

'let's create a link to my home page

dim objURL
set objURL = objShell.CreateShortcut(strDesktop & "\webtrados.url")
objURL.TargetPath = "http://www.iwebtrados.com.cn/"
objURL.Save
end function

轉載于:https://www.cnblogs.com/webtrados/archive/2009/08/07/1541516.html

總結

以上是生活随笔為你收集整理的纯脚本创建桌面快捷方式的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。