| |
Set WshShell = CreateObject( "WScript.Shell" )
strRoot = "HKCU"
strPath = "Software\Microsoft\Windows\CurrentVersion\Internet Settings"
strName = "ProxyEnable"
strTarget = strRoot & "\" & strPath & "\" & strName
WshShell.RegWrite strTarget, 1, "REG_DWORD"
Call WshShell.Run( "YDM.exe", , True )
WshShell.RegWrite strTarget, 0, "REG_DWORD"
| |
