Скрипт включения сети для Windows 7

[Ferum01]

Помогить поправить скрипт работающий в windows xp, в windows 7 работать не хочет...
'---------------------------------------------------
'http
Sub SetDeffLangSettings()
Set WshShell = CreateObject("WScript.Shell")

WshShell.RegWrite "HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Network Connections\NC_EnableAdminProhibits","1"

End Sub

'------------------------------------------------------------------------------------------
Call SetDeffLangSettings()
WScript.Quit

[LehaMechanic]

WshShell.RegWrite "HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Network Connections\NC_EnableAdminProhibits","1" »
Нет такого ключа. А вот HKEY_Local_Machine\Software\Policies\Microsoft\Windows\Network Connections есть. Возможно дело в этом?