使用 VB 或 Script 控制 IE 網頁檢查更新版本設定

2008-10-20

7200
0
VB / VBA

摘要:使用 VB 或 Script 控制 IE 網頁檢查更新版本設定

使用 VB 或 Script 設定 IE 網頁檢查更新版本

前段時間朋友問到的問題 , 他們開發的網頁系統遇到IE中網頁更新設定被改掉問題

希望透過 Script 的來調整 IE網頁檢查更新版本設定, 底下整理供網友參考

Microsoft Internet Explorer SyncMode

參數設定說明:

每次造訪網頁時	3
每次啟動 Internet Explorer 時	2
自動	4
無	0

<< VB.Net >>

先引用 Imports Microsoft.Win32

Dim key As String key = "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings" Dim RegKey As RegistryKey RegKey = Registry.CurrentUser.OpenSubKey(key, True) RegKey.SetValue("SyncMode5", 3) ' 設定每次造訪網頁時更新

<< VB6 >>

Dim WshShell As Object Dim strKey As String Set WshShell = CreateObject("WScript.Shell") strKey = "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\SyncMode5" WshShell.RegWrite strKey, 4 ' 設定自動更新

<< VBScript >> *.VBS

Dim wmi, reg, p, k Set wmi = GetObject("winmgmts:") ' 關掉正開啟中的 IE For Each p In wmi.InstancesOf("Win32_Process") If p.Name = "iexplore.exe" Then p.Terminate Next Set reg = GetObject("winmgmts:\\.\root\default:StdRegProv") k = "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings" reg.SetDWORDValue &H80000001, k, "SyncMode5", 2 ' 設定每次啟動 Internet Explorer 時更新

另外也可存成 Reg 檔 , 再用 Shell 函數呼叫執行 , 如 Shell ”RegEdit /s SyncMode.reg”

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings]
"SyncMode5"="4"

PS : 程式執行後需重新開啟 IE

回首頁