Получить необходимые права для редактирования реестра

[Mongoose]

Добрый день
На xp вот этот код выдаёт исключение Запрошенный доступ к реестру запрещён.

Код: Выделить всё

Dim reg As RegistryKey = Registry.LocalMachine
Dim reg3 As RegistryKey
Dim cs(4) As String
Dim f As System.Security.Permissions.RegistryPermission
f = New System.Security.Permissions.RegistryPermission(System.Security.Permissions.RegistryPermissionAccess.AllAccess, "system\" & cs(cs1) & "\enum\USB\")
reg3 = reg.OpenSubKey("system\" & cs(cs1) & "\enum\USB\", True)


При этом RegEdit может редактировать эту ветку если запустить под администратором или дать пользователю права на эту ветку.
Каким образом получить право на редактирование/удаление данной ветки?

[773FF]

Написать сервис с ServiceProcessInstaller.ServiceAccount = ServiceAccount.LocalSystem. И Вы получите необходимые права для редактирования реестра.
Хотя в Windows XP с реестром таким проблем не наблюдалось. Может быть в коде ошибки?