欧美大屁股bbbbxxxx,狼人大香伊蕉国产www亚洲,男ji大巴进入女人的视频小说,男人把ji大巴放进女人免费视频,免费情侣作爱视频

歡迎來到入門教程網(wǎng)!

vb

當(dāng)前位置:主頁 > 軟件編程 > vb >

用vbscript實現(xiàn)修改屏幕保護(hù)的等待時間長度

來源:本站原創(chuàng)|時間:2020-01-10|欄目:vb|點擊: 次

問:
嗨,Scripting Guy!是否可以使用腳本來修改計算機上屏幕保護(hù)的等待時間長度?
-- JN
答:
嗨,JN。出于某些原因,Microsoft 的腳本技術(shù)在涉及 Windows 設(shè)置和組件方面有些不足,例如屏幕保護(hù)、墻紙、任務(wù)欄和開始菜單等等。您可以使用 WMI(尤其是 Win32_Desktop 類)來讀取這些值,但不能使用 Win32_Desktop 類(或是任何等價的類或?qū)ο螅﹣硇薷倪@些值。為什么呢?老實說,我們也不知道;
幸好,這些值大都存儲在 Windows 注冊表中,而只要這些值存儲在注冊表中,您就可以編寫腳本來管理它們。屏幕保護(hù)程序也不例外。打開 Regedit,讓我們來看看 HKEY_CURRENT_USER 內(nèi)部;在 Control Panel\Desktop 項中,您將會看到幾個與屏幕保護(hù)程序有關(guān)的注冊表值,包括 ScreenSaveTimeout。您可能猜到了,這就是確定屏幕保護(hù)等待的時間長度的注冊表值。默認(rèn)情況下,這個值被設(shè)置為 600 秒,也就是 10 分鐘。
那么,如何更改這個值呢?通過使用如下的腳本可以將等待時間更改為 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á)到這個目的,我們首先創(chuàng)建一個名為 HKEY_CURRENT_USER 的常量,并將它的值設(shè)置為 &H80000001;這告訴 WMI 的注冊表提供程序,我們正在處理注冊表的 HKEY_CURRENT_USER 部分。如果我們要處理 HKEY_LOCAL_MACHINE,那么我們就需要將常量設(shè)置為 &H80000001;將常量設(shè)置為 &H80000003 則可以處理 HKEY_USERS。
由于我們在本地計算機上執(zhí)行這個腳本,因此我們將變量 strComputer 設(shè)置為點(在 WMI 中表示本地計算機的快捷方式)。注冊表提供程序的出色之處在于,它可以在遠(yuǎn)程計算機上工作,并且性能和在本地計算機上一樣好。因此如果您希望更改遠(yuǎn)程計算機上的屏幕保護(hù)等待時間,只需將 strComputer 的值設(shè)置為那臺計算機的名稱即可。
從此時開始,我們連接到 WMI 服務(wù),并指定注冊表路徑 (Control Panel\Desktop)。接下來我們將調(diào)用 CreateKey 方法。這是為了保險起見。因為如果我們查找的注冊表項不存在,則 CreateKey 就會創(chuàng)建這個注冊表項。如果注冊表項已經(jīng)存在,那么 CreateKey 將會保留這個注冊表項。
在指定要更改的注冊表值名稱 (ScreenSaveTimeout) 以及新值 (300) 之后,接下來我們使用 SetStringValue 方法來將等待時間更改為 300 秒。
還不算太壞,是吧?有關(guān)注冊表提供程序——可能是所有 WMI 提供程序中最不常用的一個了——的更多信息,請參閱“Microsoft Windows 2000 腳本指南”中的 “注冊表”一章。并訪問聲名不佳的Tweakomatic,這個令人驚奇的實用工具可以編寫可對注冊表進(jìn)行讀寫操作的腳本。為了從傳統(tǒng)商業(yè)中沾光,它使用了 Tweakomatic 的名字,這的確大有好處。
順便提及,以下是另一個比較有用的屏幕保護(hù)程序腳本,這個腳本可以確保屏幕保護(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
你看,注冊表腳本編寫多么有趣?!Tweakomatic 還有其他腳本可以用來管理屏幕保護(hù)程序、開始菜單、任務(wù)欄、Windows 資源管理器文件夾設(shè)置以及更多內(nèi)容。如果您正在尋找管理常見桌面設(shè)置的方法,這是一個開始進(jìn)行工作的好地方。

上一篇:把vbscript發(fā)揮到它的極限應(yīng)用之一(數(shù)組)?。?!

欄    目:vb

下一篇:發(fā)老兵及海洋VBS解包工具代碼

本文標(biāo)題:用vbscript實現(xiàn)修改屏幕保護(hù)的等待時間長度

本文地址:http://mengdiqiu.com.cn/a1/vb/7847.html

網(wǎng)頁制作CMS教程網(wǎng)絡(luò)編程軟件編程腳本語言數(shù)據(jù)庫服務(wù)器

如果侵犯了您的權(quán)利,請與我們聯(lián)系,我們將在24小時內(nèi)進(jìn)行處理、任何非本站因素導(dǎo)致的法律后果,本站均不負(fù)任何責(zé)任。

聯(lián)系QQ:835971066 | 郵箱:835971066#qq.com(#換成@)

Copyright © 2002-2020 腳本教程網(wǎng) 版權(quán)所有