Dim OperationRegistry
Set OperationRegistry=WScript.CreateObject("WScript.Shell")
OperationRegistry.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settingsones31001",0,"REG_DWORD"
OperationRegistry.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settingsones31004",0,"REG_DWORD"
OperationRegistry.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settingsones31200",0,"REG_DWORD"
OperationRegistry.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settingsones31201",0,"REG_DWORD"
OperationRegistry.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settingsones31405",0,"REG_DWORD"
OperationRegistry.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settingsones32201",0,"REG_DWORD"
Air Hogs Elite Helix X4遥控飞行器
http://www.cnblogs.com/zery/p/3438845.html