亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > VBScript > 正文

用vbs檢測Internet Explorer 中是否啟用了 ActiveX

2020-03-24 18:32:15
字體:
來源:轉載
供稿:網友
您好,JV。您一定要問這個問題,是嗎?實際上,這并不是一個特別難回答的問題,只是有點復雜。不過,那與配置 Internet Explorer 的方式緊密相關,而與通過編寫一個腳本來檢索此信息關系不大。首先,Internet Explorer 沒有管理對象模型;相反,我們能夠通過編程的方式檢索 Internet Explorer 設置和屬性值的唯一方法就是通過編寫一個腳本來從注冊表中獲取此信息。這相當容易;我們經常在本專欄中使用注冊表讀取的腳本。最為棘手的部分就是搞清楚需要讀取哪個注冊表值,并知道如何解釋返回的數據。
注意:另一個棘手的部分在于知道您對哪個 ActiveX 設置感興趣;不論好壞,Internet Explorer 有與 ActiveX 控件相關的多個設置。在今天的專欄中,我們假定您要讀取此設置的值:運行 ActiveX 控件和插件。讓我們先從搞清楚需要修改哪些注冊表值開始。實際上,Internet Explorer 安全設置沒有全局設置;相反,這些設置由 Internet Explorer 區域進行管理。有四個這樣的安全區域;區域名及其值如下表所示:
可在注冊表的 HKEY_CURRENT_USER/ Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/ 部分中找到 Internet Explorer 安全區域的設置;要訪問某個特定區域,您需要訪問與該區域對應的子項。要確定相應的子項,只需將區域值追加到前面的注冊表路徑即可。例如,要獲取 Internet 站點區域(值 3)的設置,您需要訪問以下注冊表子項:HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/3您能看到 3 被追加到了末尾處。要訪問 Intranet 站點區域(值 1)的設置?沒問題:HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/1找到正確的注冊表子項后,您需要知道要讀取哪個注冊表值。遺憾的是(至少對于腳本編寫者來說),這些注冊表值的名稱有點含糊;例如,我們感興趣的名稱為 1200。(為什么是這樣呢?我們不知道。)如果您對使用腳本來讀取/管理 Internet Explorer 設置感興趣,那么,您可能希望閱讀一下 Managing Internet Explorer Enhanced Security Configuration whitepaper(英文)。僅一部分文檔會涉及腳本編寫,但是,該部分的確將這些含糊的注冊表值映射到了用戶界面中的相應屬性。當然,許多這樣的設置都可在 Tweakomatic 中找到。(Tweakomatic 與白皮書不同,它會真正地為您編寫腳本。)那么,我們已準備最終編寫一個腳本并真的在此執行一些操作嗎?幾乎是這樣。您需要知道的另一件事就是配置信息作為雙字節(數字)值被存儲在注冊表中。如果您知道 ActiveX 控件被配置為 3 而不是 65536,這會有所幫助嗎?可能沒有。不過,下表可能有所幫助:
不,最后一個值并非印刷錯誤,它的確為 65536。自己去想吧。那好,現在我們就準備編寫一個腳本。下面的這個示例腳本可檢索 Intranet 站點區域(區域值 1)的設置信息:HKEY_CURRENT_USER = &H80000001strComputer = "."Set objReg = GetObject("winmgmts://" & strComputer & "/root/default:StdRegProv")strKeyPath = "Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/1"ValueName = "1200"objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValueWscript.Echo "Run ActiveX Controls and Plug-ins"If IsNull(dwValue) Then Wscript.Echo "Intranet sites: The html' target='_blank'>value is either Null or could not be found in the registry."ElseIf dwValue = 0 Then Wscript.Echo "Intranet sites: Enabled"ElseIf dwValue = 1 Then Wscript.Echo "Intranet sites: Prompt"ElseIf dwValue = 3 Then Wscript.Echo "Intranet sites: Disabled"ElseIf dwValue = 65536 Then Wscript.Echo "Intranet sites: Administrator Approved"End If我們首先定義一個名為 HKEY_CURRENT_USER 的常量并將其值設置為 &H80000001;這將告訴腳本我們要使用哪個注冊表配置單元。然后我們連接到 WMI 服務;請注意,StdRegProv(標準注冊表提供程序)類位于 root/default 命名空間中。(許多腳本編寫者都認為該類與大多數 WMI 類一樣,都位于 root/cimv2 中。事實并非如此。)接下來我們將為一對變量賦值:strKeyPath = "Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/1"ValueName = "1200"正如您所看到的,變量 strKeyPath 包含 HKEY_CURRENT_USER 中的注冊表路徑(請勿在該路徑中包含 HKEY_CURRENT_USER,否則,腳本將失?。?。同時,將變量 ValueName 設置為 1200,該值恰好為我們要讀取的注冊表值。然后我們調用 GetDWORDValue 方法,這樣我們可讀取注冊表中的雙字節值:objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValue請注意,我們需要向 GetDWORDValue 傳遞幾個參數:
dwValue,將結束存儲從注冊表中讀取的值的“輸出參數”。如果您正在想,“請稍等,我們沒有為 dwValue 賦值,”您說對了。我們就是這樣設計的:我們不為輸出參數賦值。相反,GetDWORDValue 將讀取恰好存儲在所討論的注冊表值 (1200) 中的任何值,然后該方法會將該值賦給 dwValue。這確實很不錯,不是嗎?此時,我們可只回顯從注冊表中檢索的值。不過,正如我們所指出的那樣,該檢索值將為諸如 1、3 或 65536 這樣的值。因此,我們建立一個簡單小巧的 If Then ElseIf 塊以檢查返回值,并回顯一個更有意義的消息:If IsNull(dwValue) Then Wscript.Echo "Intranet sites: The value is either Null or could not be found in the registry."ElseIf dwValue = 0 Then Wscript.Echo "Intranet sites: Enabled"ElseIf dwValue = 1 Then Wscript.Echo "Intranet sites: Prompt"ElseIf dwValue = 3 Then Wscript.Echo "Intranet sites: Disabled"ElseIf dwValue = 65536 Then Wscript.Echo "Intranet sites: Administrator Approved"End If您說對了:一旦您知道值存儲在注冊表中的什么位置以及如何將值存儲在注冊表中,這就相當容易了。僅僅為了省去鍵入(和/或復制與粘貼)之苦,下面的腳本可返回所有四個安全區域的信息:HKEY_CURRENT_USER = &H80000001strComputer = "."Set objReg = GetObject("winmgmts://" & strComputer & "/root/default:StdRegProv")strKeyPath = "Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/1"ValueName = "1200"objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValueWscript.Echo "Run ActiveX Controls and Plugins"If IsNull(dwValue) Then Wscript.Echo "Intranet sites: The value is either Null or could not be found in the registry."ElseIf dwValue = 0 Then Wscript.Echo "Intranet sites: Enabled"ElseIf dwValue = 1 Then Wscript.Echo "Intranet sites: Prompt"ElseIf dwValue = 3 Then Wscript.Echo "Intranet sites: Disabled"ElseIf dwValue = 65536 Then Wscript.Echo "Intranet sites: Administrator Approved"End IfstrKeyPath = "Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/2"ValueName = "1200"objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValueIf IsNull(dwValue) Then Wscript.Echo "Trusted sites: The value is either Null or could not be found in the registry."ElseIf dwValue = 0 Then Wscript.Echo "Trusted sites: Enabled"ElseIf dwValue = 1 Then Wscript.Echo "Trusted sites: Prompt"ElseIf dwValue = 3 Then Wscript.Echo "Trusted sites: Disabled"ElseIf dwValue = 65536 Then Wscript.Echo "Trusted sites: Administrator Approved"End IfstrKeyPath = "Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/3"ValueName = "1200"objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValueIf IsNull(dwValue) Then Wscript.Echo "Internet sites: The value is either Null or could not be found in the registry."ElseIf dwValue = 0 Then Wscript.Echo "Internet sites: Enabled"ElseIf dwValue = 1 Then Wscript.Echo "Internet sites: Prompt"ElseIf dwValue = 3 Then Wscript.Echo "Internet sites: Disabled"ElseIf dwValue = 65536 Then Wscript.Echo "Internet sites: Administrator Approved"End IfstrKeyPath = "Software/Microsoft/Windows/CurrentVersion/Internet Settings/Zones/4"ValueName = "1200"objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValueIf IsNull(dwValue) Then Wscript.Echo "Restricted sites: The value is either Null or could not be found in the registry."ElseIf dwValue = 0 Then Wscript.Echo "Restricted sites: Enabled"ElseIf dwValue = 1 Then Wscript.Echo "Restricted sites: Prompt"ElseIf dwValue = 3 Then Wscript.Echo "Restricted sites: Disabled"ElseIf dwValue = 65536 Then Wscript.Echo "Restricted sites: Administrator Approved"End If運行腳本,將返回類似下面內容的輸出:Run ActiveX Controls and PluginsIntranet sites: EnabledTrusted sites: EnabledInternet sites: EnabledRestricted sites: Disabled在此我們還能再做些什么嗎?或許可以;畢竟我們還可配置此注冊表值。但那是改天要討論的內容了。html教程

鄭重聲明:本文版權歸原作者所有,轉載文章僅為傳播更多信息之目的,如作者信息標記有誤,請第一時間聯系我們修改或刪除,多謝。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
日韩经典一区二区三区| 亚洲www在线| 亚洲国产婷婷香蕉久久久久久| 国产欧美一区二区三区在线| 亚洲情综合五月天| 亚洲欧美综合图区| 97人人模人人爽人人喊中文字| 亚洲综合日韩在线| 国产成人在线一区二区| 91av在线免费观看视频| 日本成人免费在线| 欧美日韩国产在线看| 亚洲v日韩v综合v精品v| 欧美天天综合色影久久精品| 欧美激情视频给我| 在线观看国产精品淫| 国产在线一区二区三区| 日韩精品一区二区三区第95| 欧美在线视频免费| 亚洲毛片在线观看.| 欧美电影免费观看网站| 久久久久久久久久国产| 国产成人免费av| 亚洲电影免费观看| 精品毛片三在线观看| 欧美精品久久久久久久久久| 欧美激情网友自拍| www国产精品com| 日韩av在线精品| 一本大道久久加勒比香蕉| 欧美国产日韩在线| 亚洲免费一在线| 中文字幕久热精品在线视频| 国产精品久久久久免费a∨| 91精品久久久久久久久久另类| 色无极影院亚洲| 91免费综合在线| 国产福利成人在线| 日韩精品视频免费在线观看| 一区二区三区四区在线观看视频| 欧美大片va欧美在线播放| 国产精品久久久久久久美男| 国内揄拍国内精品| 在线看片第一页欧美| 日本a级片电影一区二区| 亚洲电影成人av99爱色| 日韩精品在线观看一区| 国产精品88a∨| 久久激情五月丁香伊人| 97av在线视频| 久久亚洲影音av资源网| 97视频在线观看成人| 国产成人精品综合| 奇米4444一区二区三区| 欧美专区在线视频| 91av在线国产| 欧美午夜宅男影院在线观看| 青草青草久热精品视频在线网站| 欧美精品生活片| 亚洲国产日韩欧美综合久久| 国产精品久久国产精品99gif| 538国产精品一区二区在线| 爽爽爽爽爽爽爽成人免费观看| 亚洲欧美制服丝袜| 91情侣偷在线精品国产| 国产小视频91| 久久精品国产成人精品| 91中文字幕一区| 亚洲男人的天堂网站| 欧美日韩电影在线观看| 久久五月情影视| 日韩在线观看你懂的| 日韩av中文字幕在线| 国产一区二区三区在线视频| 成人xxxxx| 国产在线高清精品| 亚洲精品国产精品自产a区红杏吧| 亚洲一区二区三区视频| 国产精品极品在线| 欧美视频中文字幕在线| 91精品国产自产91精品| 91中文字幕在线观看| 国产日韩综合一区二区性色av| 国产日韩欧美中文在线播放| 国产精品偷伦免费视频观看的| 国产一区二区在线免费| 国产成+人+综合+亚洲欧洲| 欧美色视频日本版| 青青久久av北条麻妃海外网| 欧美成人精品不卡视频在线观看| 大量国产精品视频| 91香蕉国产在线观看| 北条麻妃久久精品| 亚洲黄一区二区| 亚洲国产免费av| 亚洲精品久久久久国产| 91精品在线影院| 国产91在线视频| 国产精品十八以下禁看| 欧美国产精品va在线观看| 日韩成人在线电影网| 欧美激情乱人伦一区| 欧美视频不卡中文| 国产精品美女久久| 中文字幕日韩视频| 日韩在线观看免费全| 日韩极品精品视频免费观看| 亚洲伊人一本大道中文字幕| 亚洲色图色老头| 热99精品只有里视频精品| 97涩涩爰在线观看亚洲| 国产欧美久久一区二区| 国产精品十八以下禁看| 久久亚洲国产精品成人av秋霞| 成人精品视频99在线观看免费| 国产欧美日韩亚洲精品| 91精品国产综合久久香蕉| 免费不卡欧美自拍视频| 国产精品黄视频| 日韩电影网在线| 超薄丝袜一区二区| 欧美裸体xxxx极品少妇软件| 欧美亚洲国产另类| 久久久极品av| 性欧美亚洲xxxx乳在线观看| 美日韩精品视频免费看| 欧美激情视频在线观看| 亚洲精品在线不卡| 久久天天躁夜夜躁狠狠躁2022| 日韩少妇与小伙激情| 日韩经典一区二区三区| 97超视频免费观看| 欧美性视频精品| 亚洲精品91美女久久久久久久| 国产女人18毛片水18精品| 日本一欧美一欧美一亚洲视频| 欧美电影免费播放| 国产亚洲欧美日韩一区二区| 亚洲国产天堂久久国产91| 国产亚洲欧洲黄色| 国产成人精品综合久久久| 在线播放日韩欧美| 久久影视电视剧免费网站清宫辞电视| 成人免费视频97| 成人有码视频在线播放| 国产精品美女久久久久av超清| 国产精品露脸av在线| 91色在线视频| 日韩电影网在线| 精品久久香蕉国产线看观看gif| 日韩精品日韩在线观看| 亚洲综合在线做性| 成人h视频在线| 亚洲少妇中文在线| 亚洲一区二区三区成人在线视频精品| 国产成人小视频在线观看| 亚洲四色影视在线观看| 欧美麻豆久久久久久中文| 激情亚洲一区二区三区四区| 欧美日韩亚洲一区二区三区| 欧美大奶子在线| 国内免费久久久久久久久久久| 日韩在线视频网站| 欧美中文字幕精品|