推 sellig:感謝~ 11/17 09:23
※ oniki:轉錄至看板 Wallpaper 03/07 14:09
※ 引述《uoyihc ()》之銘言：
: ※ 引述《sellig (關卡)》之銘言：
: : 作者: sellig (關卡) 看板: Wallpaper
: : 標題: [其他] 該如何才能在Y'z Dock中增加「關機」的圖示？
: : 時間: Mon Nov 14 19:31:49 2005
: : 如題
: : 該怎麼做才可以從dock來執行關機的動作呢？
: : 找了好久還找不到
: : 請高手指點...
: : 感謝
: 如果你是指要作關機的捷徑的話
: -----------------------------
: Dim objShell
: Set objShell = CreateObject("Shell.Application")
: objShell.ShutdownWindows
: -----------------------------
: 用記事本打上面三行
: 存成Shutdown.vbs
: 再把這個檔作一個捷徑拉到dock上
: 以後按下去就會出現關機畫面了
: 這是很久很久以前在一個國外網站看到的
: 網站上還有很多其他功能的寫法
: 不過我忘記是什麼網站了
: 如果有人知道的話 請告知一下
: 謝謝 XD
關機
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.ShutdownWindows
顯示桌面
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.MinimizeAll
執行
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.FileRun
搜尋
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.FindFiles
作法一樣 貼到記事本 存成.vbs檔即可
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.139.155.146