主頁 > 知識庫 > 用vbs檢查注冊表項的訪問權(quán)限的代碼

用vbs檢查注冊表項的訪問權(quán)限的代碼
熱門標簽：墨西哥地圖標注app 上海辦理400電話選號 機器人打電銷適用于美業(yè)嗎 智云億呼電話機器人 外呼系統(tǒng)說話聲音小怎么辦 外呼系統(tǒng)群 企業(yè)400電話辦理價錢低 天津智能外呼系統(tǒng)排名 龍巖400電話申請
const KEY_QUERY_VALUE = H0001
const KEY_SET_VALUE = H0002
const KEY_CREATE_SUB_KEY = H0004
const DELETE = H00010000
const HKEY_LOCAL_MACHINE = H80000002
strComputer = "."
Set StdOut = WScript.StdOut
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _ 
strComputer  "\root\default:StdRegProv")
strKeyPath = "SYSTEM\CurrentControlSet"
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, KEY_QUERY_VALUE, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Query Value Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Query Value Access Rights on Key"
End If  
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, KEY_SET_VALUE, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Set Value Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Set Value Access Rights on Key"
End If  
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, KEY_CREATE_SUB_KEY, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Create SubKey Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Create SubKey Access Rights on Key"
End If
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, DELETE, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Delete Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Delete Access Rights on Key"
End If

標簽：青島 黃山 鄂爾多斯 阜新 齊齊哈爾 承德 麗水 錫林郭勒盟

巨人網(wǎng)絡通訊聲明：本文標題《用vbs檢查注冊表項的訪問權(quán)限的代碼》，本文關(guān)鍵詞  用,vbs,檢查,注冊,表項,的,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡，涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《用vbs檢查注冊表項的訪問權(quán)限的代碼》相關(guān)的同類信息！
  • 本頁收集關(guān)于用vbs檢查注冊表項的訪問權(quán)限的代碼的相關(guān)信息資訊供網(wǎng)民參考！
    • 推薦文章