用vbscript實(shí)現(xiàn)修改屏幕保護(hù)的等待時(shí)間長(zhǎng)度
問(wèn):
嗨,Scripting Guy!是否可以使用腳本來(lái)修改計(jì)算機(jī)上屏幕保護(hù)的等待時(shí)間長(zhǎng)度?
-- JN
答:
嗨,JN。出于某些原因,Microsoft 的腳本技術(shù)在涉及 Windows 設(shè)置和組件方面有些不足,例如屏幕保護(hù)、墻紙、任務(wù)欄和開(kāi)始菜單等等。您可以使用 WMI(尤其是 Win32_Desktop 類(lèi))來(lái)讀取這些值,但不能使用 Win32_Desktop 類(lèi)(或是任何等價(jià)的類(lèi)或?qū)ο螅﹣?lái)修改這些值。為什么呢?老實(shí)說(shuō),我們也不知道;
幸好,這些值大都存儲(chǔ)在 Windows 注冊(cè)表中,而只要這些值存儲(chǔ)在注冊(cè)表中,您就可以編寫(xiě)腳本來(lái)管理它們。屏幕保護(hù)程序也不例外。打開(kāi) Regedit,讓我們來(lái)看看 HKEY_CURRENT_USER 內(nèi)部;在 Control Panel\Desktop 項(xiàng)中,您將會(huì)看到幾個(gè)與屏幕保護(hù)程序有關(guān)的注冊(cè)表值,包括 ScreenSaveTimeout。您可能猜到了,這就是確定屏幕保護(hù)等待的時(shí)間長(zhǎng)度的注冊(cè)表值。默認(rèn)情況下,這個(gè)值被設(shè)置為 600 秒,也就是 10 分鐘。
那么,如何更改這個(gè)值呢?通過(guò)使用如下的腳本可以將等待時(shí)間更改為 5 分鐘(300 秒):
HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set objReg = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "Control Panel\Desktop"
objReg.CreateKey HKEY_CURRENT_USER, strKeyPath
ValueName = "ScreenSaveTimeout"
strValue = "300"
objReg.SetStringValue HKEY_CURRENT_USER, strKeyPath, ValueName, strValue
為了達(dá)到這個(gè)目的,我們首先創(chuàng)建一個(gè)名為 HKEY_CURRENT_USER 的常量,并將它的值設(shè)置為 &H80000001;這告訴 WMI 的注冊(cè)表提供程序,我們正在處理注冊(cè)表的 HKEY_CURRENT_USER 部分。如果我們要處理 HKEY_LOCAL_MACHINE,那么我們就需要將常量設(shè)置為 &H80000001;將常量設(shè)置為 &H80000003 則可以處理 HKEY_USERS。
由于我們?cè)诒镜赜?jì)算機(jī)上執(zhí)行這個(gè)腳本,因此我們將變量 strComputer 設(shè)置為點(diǎn)(在 WMI 中表示本地計(jì)算機(jī)的快捷方式)。注冊(cè)表提供程序的出色之處在于,它可以在遠(yuǎn)程計(jì)算機(jī)上工作,并且性能和在本地計(jì)算機(jī)上一樣好。因此如果您希望更改遠(yuǎn)程計(jì)算機(jī)上的屏幕保護(hù)等待時(shí)間,只需將 strComputer 的值設(shè)置為那臺(tái)計(jì)算機(jī)的名稱(chēng)即可。
從此時(shí)開(kāi)始,我們連接到 WMI 服務(wù),并指定注冊(cè)表路徑 (Control Panel\Desktop)。接下來(lái)我們將調(diào)用 CreateKey 方法。這是為了保險(xiǎn)起見(jiàn)。因?yàn)槿绻覀儾檎业淖?cè)表項(xiàng)不存在,則 CreateKey 就會(huì)創(chuàng)建這個(gè)注冊(cè)表項(xiàng)。如果注冊(cè)表項(xiàng)已經(jīng)存在,那么 CreateKey 將會(huì)保留這個(gè)注冊(cè)表項(xiàng)。
在指定要更改的注冊(cè)表值名稱(chēng) (ScreenSaveTimeout) 以及新值 (300) 之后,接下來(lái)我們使用 SetStringValue 方法來(lái)將等待時(shí)間更改為 300 秒。
還不算太壞,是吧?有關(guān)注冊(cè)表提供程序——可能是所有 WMI 提供程序中最不常用的一個(gè)了——的更多信息,請(qǐng)參閱“Microsoft Windows 2000 腳本指南”中的 “注冊(cè)表”一章。并訪(fǎng)問(wèn)聲名不佳的Tweakomatic,這個(gè)令人驚奇的實(shí)用工具可以編寫(xiě)可對(duì)注冊(cè)表進(jìn)行讀寫(xiě)操作的腳本。為了從傳統(tǒng)商業(yè)中沾光,它使用了 Tweakomatic 的名字,這的確大有好處。
順便提及,以下是另一個(gè)比較有用的屏幕保護(hù)程序腳本,這個(gè)腳本可以確保屏幕保護(hù)程序受到密碼保護(hù):
HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set objReg = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "Control Panel\Desktop"
objReg.CreateKey HKEY_CURRENT_USER, strKeyPath
ValueName = "ScreenSaverIsSecure"
strValue = "1"
objReg.SetStringValue HKEY_CURRENT_USER, strKeyPath, ValueName, strValue
你看,注冊(cè)表腳本編寫(xiě)多么有趣?!Tweakomatic 還有其他腳本可以用來(lái)管理屏幕保護(hù)程序、開(kāi)始菜單、任務(wù)欄、Windows 資源管理器文件夾設(shè)置以及更多內(nèi)容。如果您正在尋找管理常見(jiàn)桌面設(shè)置的方法,這是一個(gè)開(kāi)始進(jìn)行工作的好地方。
上一篇:把vbscript發(fā)揮到它的極限應(yīng)用之一(數(shù)組)?。。?/a>
欄 目:vb
本文標(biāo)題:用vbscript實(shí)現(xiàn)修改屏幕保護(hù)的等待時(shí)間長(zhǎng)度
本文地址:http://mengdiqiu.com.cn/a1/vb/7847.html
您可能感興趣的文章
- 01-10VBS中的正則表達(dá)式的用法大全 <font color=red>原創(chuàng)&
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10VBScript教程 第十一課深入VBScript
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript語(yǔ)法速查及實(shí)例說(shuō)明
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第七課使用條件語(yǔ)句
- 01-10vbscript 可以按引用傳遞參數(shù)嗎?
- 01-10VBScript教程 第二課在HTML頁(yè)面中添加VBscript代碼
- 01-10VBScript教程 第十四課在VBScript中使用對(duì)象


閱讀排行
- 1C語(yǔ)言 while語(yǔ)句的用法詳解
- 2java 實(shí)現(xiàn)簡(jiǎn)單圣誕樹(shù)的示例代碼(圣誕
- 3利用C語(yǔ)言實(shí)現(xiàn)“百馬百擔(dān)”問(wèn)題方法
- 4C語(yǔ)言中計(jì)算正弦的相關(guān)函數(shù)總結(jié)
- 5c語(yǔ)言計(jì)算三角形面積代碼
- 6什么是 WSH(腳本宿主)的詳細(xì)解釋
- 7C++ 中隨機(jī)函數(shù)random函數(shù)的使用方法
- 8正則表達(dá)式匹配各種特殊字符
- 9C語(yǔ)言十進(jìn)制轉(zhuǎn)二進(jìn)制代碼實(shí)例
- 10C語(yǔ)言查找數(shù)組里數(shù)字重復(fù)次數(shù)的方法
本欄相關(guān)
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10飄葉千夫指源代碼,又稱(chēng)qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個(gè)高效的軟件
- 01-10VBS中的正則表達(dá)式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語(yǔ)法速查及實(shí)例說(shuō)明
隨機(jī)閱讀
- 01-11ajax實(shí)現(xiàn)頁(yè)面的局部加載
- 08-05DEDE織夢(mèng)data目錄下的sessions文件夾有什
- 01-10使用C語(yǔ)言求解撲克牌的順子及n個(gè)骰子
- 01-10SublimeText編譯C開(kāi)發(fā)環(huán)境設(shè)置
- 08-05織夢(mèng)dedecms什么時(shí)候用欄目交叉功能?
- 04-02jquery與jsp,用jquery
- 01-10C#中split用法實(shí)例總結(jié)
- 01-11Mac OSX 打開(kāi)原生自帶讀寫(xiě)NTFS功能(圖文
- 01-10delphi制作wav文件的方法
- 08-05dedecms(織夢(mèng))副欄目數(shù)量限制代碼修改