Показать сообщение отдельно
Старый 03.08.2010, 12:57   #151
ksa_kiev
Пользователь
 
Пол:Мужской
Регистрация: 31.01.2006
Сообщений: 61
Репутация: 30
По умолчанию Re: Windows Server 2003 Terminal Server Licensing

Цитата:
Сообщение от Dialod Посмотреть сообщение
Так вот вопрос если все 10 компов просто подключить к серверу терминалов не покупая не одной клиетской лицензии и не активируя сервер терминалов на майкрософте будет ли выдавать сервер лицензий лицензии после 120 дневной работы ? или его надо тоже сбрасывать как и на клиентских машинах.

1. Т = 120 или 90 дней - это от сервера зависит. кажись в 2003 - 90 дней.
2. На сервере хранилище временных лицензий расположено HKEY_LOCAL_MACHINE\Software\Microsoft\MSLicensing\ Store
3. когда я писал про [-HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing] это относилось к разделу всех параметров Службы лицензирования терминалов.
4. Есть 2 метода решения вопроса по продлению выдачи временных тестовых лицензий:
4.1 удалить через t <= (Т-1) дней Службы лицензирования терминалов и установить заново, тем самым начав тестирование возможностей ТС опять.. ну, мало ли - не успели вы проверить, что ТС от Била работают нормально и вас устраивают..
4.2 остановить службу, снести раздел реестра, запустить службу если вы знаете и понимаете что делаете.
5. Использовать скрипт, который запускается автоматом и сам решает "трудоемкую задачу" п. 4.2.
Например что-то типа такого:

On Error Resume Next
const HKEY_LOCAL_MACHINE = &H80000002
'подключение к WMI
Set objReg = GetObject("winmgmts:{impersonationLevel=impersonat e}!\\.\root\default:StdRegProv")
If Err.Number <> 0 Then
WScript.Echo Err.Number & ": " & Err.Description
WScript.Quit
End If
'удаление разделов
intRes = objReg.DeleteKey(HKEY_LOCAL_MACHINE, "Software\Microsoft\MSLicensing\Store")
If intRes <> 0 Then
WScript.Echo intRes & ": не удалась удалить раздел ""HKEY_LOCAL_MACHINE\Software\Microsoft\MSLicensin g\Store"""
WScript.Quit
End If
intRes = objReg.DeleteKey(HKEY_LOCAL_MACHINE, "Software\Microsoft\MSLicensing\HardwareID")
If intRes <> 0 Then
WScript.Echo intRes & ": не удалась удалить раздел ""HKEY_LOCAL_MACHINE\Software\Microsoft\MSLicensin g\HardwareID"""
WScript.Quit
End If
intRes = objReg.DeleteKey(HKEY_LOCAL_MACHINE, "Software\Microsoft\MSLicensing")
If intRes <> 0 Then
WScript.Echo intRes & ": не удалась удалить раздел ""HKEY_LOCAL_MACHINE\Software\Microsoft\MSLicensin g"""
WScript.Quit
End If
ksa_kiev вне форума
 
Ответить с цитированием Вверх
Эти 3 пользователя(ей) сказали cпасибо за это полезное сообщение:
 
Время генерации страницы 0.07890 секунды с 9 запросами