国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

用vbs實現更改計算機的說明的代碼

2020-07-26 12:02:03
字體:
來源:轉載
供稿:網友

問:
您好,腳本專家!在使用 Windows 資源管理器連接到遠程計算機時,可以在“詳細信息”窗格中看見該計算機的說明。如何更改計算機的說明?
-- GF
答:
您好,GF。只是為了確保每個人都清楚我們談論的內容,我們不會談論 Active Directory 中的“說明”屬性,而是談論在整個網絡范圍內廣播的計算機說明。(如果您真正想知道的是如何更改 Active Directory 中的“說明”屬性,請參閱此“您好,腳本專家!”專欄。)
例如,在 Windows XP 中,您可通過執行以下操作來查看計算機說明:右鍵單擊“我的電腦”,單擊“屬性”,然后查看“系統屬性”對話框的“計算機名稱”選項卡中的內容:
如您所述,如果使用 Windows 資源管理器連接到該計算機,則該說明還會出現在“詳細信息”窗格中:
我們也認為這很令人興奮。
那么如何更改計算機說明呢?是這樣,您可以啟動 Regedit.exe,然后手動更改注冊表值 HKEY_LOCAL_MACHINE/System/CurrentControlSet/Services/lanmanserver/parameters/srvcomment。或運行與以下腳本類似的腳本即可:

復制代碼 代碼如下:

Const HKEY_LOCAL_MACHINE = &H80000002 
strComputer = "." 
Set objRegistry = GetObject _ 
    ("winmgmts://" & strComputer & "/root/default:StdRegProv") 
strKeyPath = "System/CurrentControlSet/Services/lanmanserver/parameters" 
strValueName = "srvcomment" 
strDescription = "Description changed programmatically" 
objRegistry.SetStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strDescription 
這當然容易啦;相處了這么長時間,您真的認為我們會突然開始為您的問題提供復雜而又費解的答案嗎?我們先是定義一個名為 HKEY_LOCAL_MACHINE 的常量并將其值設置為 &H80000002;過一會兒,我們將使用此常量來告訴腳本我們要處理的注冊表配置單元。然后,我們連接到 WMI 服務(在本例中,它位于本地計算機上,不過修改遠程計算機上注冊表的操作也差不多同樣簡單),并綁定到 StdRegProv 類。(而該類(正如我們所不厭其煩地告訴大家的)恰好位于 root/default 命名空間中。)
接下來,我們為三個變量賦值:
strKeyPath = "System/CurrentControlSet/Services/lanmanserver/parameters"
strValueName = "srvcomment"
strDescription = "Description changed programmtically"
變量 strKeyPath 表示注冊表 HKEY_LOCAL_MACHINE 部分內的路徑;strValueName 表示要更改的注冊表值 (srvcomment);還有 strDescription,沒錯:strDescription 表示新的計算機說明。您的觀察力很敏銳。
注意:我們想要說的是,你們在這方面要比我們強得多,但我們不想讓經理對此有任何了解。的確如此:對于一位 Microsoft 經理來說,了解情況將是最為重要的!
現在我們所要做的就是調用 SetStringValue 方法,同時將 HKEY_LOCAL_MACHINE 和我們的三個變量作為方法參數進行傳遞:
objRegistry.SetStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strDescription
像這樣的腳本真的確實會使生活變得有意義,不是嗎?
注意:請注意,即使是在注冊表中進行此更改,新說明可能仍要在計算機重新啟動后才會生效。這只不過是一個需要注意的地方。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 桦川县| 东兰县| 宜春市| 古丈县| 灵丘县| 澄城县| 大余县| 疏勒县| 鸡西市| 正宁县| 焉耆| 尉氏县| 通许县| 保靖县| 土默特左旗| 湟中县| 甘谷县| 库车县| 大化| 周口市| 巨鹿县| 珠海市| 永泰县| 威宁| 怀来县| 集安市| 宝丰县| 武平县| 云和县| 汪清县| 安庆市| 凌源市| 调兵山市| 时尚| 仁布县| 乌拉特中旗| 平凉市| 青田县| 仪征市| 彭泽县| 京山县|