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

首頁 > 編程 > VBScript > 正文

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

2019-10-26 17:59:20
字體:
來源:轉載
供稿:網友

問:
您好,腳本專家!在使用 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 表示新的計算機說明。您的觀察力很敏銳。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 阜平县| 来安县| 马关县| 丹阳市| 高平市| 盱眙县| 五家渠市| 板桥市| 会宁县| 舞钢市| 城步| 调兵山市| 南昌县| 惠州市| 康乐县| 阜平县| 嘉黎县| 壤塘县| 丰顺县| 交口县| 曲麻莱县| 类乌齐县| 桂东县| 唐山市| 阳朔县| 龙海市| 临夏市| 永康市| 安龙县| 连云港市| 丹凤县| 郎溪县| 子长县| 吉林省| 泰顺县| 响水县| 满洲里市| 呼和浩特市| 云南省| 儋州市| 康马县|