IE添加信任站点并设置允许ActiveX控件的VBS脚本

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set WSHShell = CreateObject("WScript.Shell")

on Error resume next

WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\hwwt2.com\",""

WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\hwwt2.com\proxy.fis\",""

WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\hwwt2.com\proxy.fis\http","2","REG_DWORD"

WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2\1201","0" ,"REG_DWORD"

Wscript.Echo "Added http://proxy.fis.hwwt2.com/ to Trusted sites Zone successfully."