Ошибка при входе по RDP

Автор: vik_kr Дата: 28 Март 2011. Категория: Терминальные технологии

Сегодня при работе в тестовой лаборатории (клиент не смог зайти на терминальный сервер) столкнулся вот с такой ошибкой.

The remote computer disconnected the session becuase of an error in the licensing protocol

или

The remote session was disconnected because the local computer’s client access license could not be upgraded or renewed. Please contact the server administrator

Решение проблемы оказалось простым – нужно удалить лицензии из кэша на клиенте.

Для удаления лицензий из кэша клиентских компьютеров необходимо в ветке реестра

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\

Удалить все значения. Как альтернативный метод могу предложить вот такой VB скрипт.

On Error Resume Next
Dim WshShell, cal1

Set WshShell = WScript.CreateObject("WScript.Shell")
key0 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE000\"
WshShell.RegDelete key0
Set WshShell = WScript.CreateObject("WScript.Shell")
key1 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE001\"
WshShell.RegDelete key1
Set WshShell = WScript.CreateObject("WScript.Shell")
key2 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE002\"
WshShell.RegDelete key2
Set WshShell = WScript.CreateObject("WScript.Shell")
key3 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE003\"
WshShell.RegDelete key3
Set WshShell = WScript.CreateObject("WScript.Shell")
key4 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE004\"
WshShell.RegDelete key4
Set WshShell = WScript.CreateObject("WScript.Shell")
key5 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE005\"
WshShell.RegDelete key5
Set WshShell = WScript.CreateObject("WScript.Shell")
key6 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store\LICENSE006\"
WshShell.RegDelete key6

Источник:http://blog.wadmin.ru