ipmanyak Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Palstap купить терм лицензии, или хакнуть это дело и сделать их типа 999. ---------- В сортире лучше быть юзером, чем админом... Всего записей: 11735 | Зарегистр. 10-12-2003 | Отправлено: 08:57 18-02-2011

urodliv Gold Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Как так вообще получается? Такова жизнь. Цитата:  Раз выдана один раз значит не должна по идее никуда деться=) Вы это матушке-природе объясните. Она идеалистов в тупик не раз ставила. Цитата: В общем объясните для чайников А чего тут объяснять? Ваша система достаточно сложная штука, использующая очень тонкие физические явления. Может была вспышка на солнце, и на вашем винчестере переписалось несколько байт информации, отвечающих за лицензирование, и всё накрылось медным тазом. А может быть вам "повезло" и вы выступили в роли тестировщика ПО, который столкнулся с косяком программиста. Тогда сообщите об этом производителю. ---------- Очень скоро еда станет совершенно безвкусной, и тогда этот недостаток придётся компенсировать хорошо развитым воображением. Всего записей: 6689 | Зарегистр. 29-04-2009 | Отправлено: 19:12 18-02-2011

kubrak1985 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Выполняется на клиентской машине: 1) Удаляется ветка реестра HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSLicensing\Store 2) "Пуск"->"Все программы"->"Стандартные"->"Подключение к удаленному рабочему столу" правая кнопка мыши "Запуск от имени администратора" Всего записей: 299 | Зарегистр. 30-01-2009 | Отправлено: 15:59 21-02-2011

kubrak1985 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Попробуй написать такой скрит и засунь его в автозагрузку   Const HKLM = &H80000002 Const MSLicensingStore = "Software\Microsoft\MSLicensing\Store\" Set oReg = GetObject("winmgmts:\\.\root\default:StdRegProv") RetVal = oReg.EnumKey(HKLM, MSLicensingStore, RegKeys) If RetVal <> 0 Then    MsgBox("Не удалось прочитать ветвь реестра " & MSLicensingStore)    WScript.Quit End If If IsArray(RegKeys) Then    For Each Key In RegKeys        KeyName = MSLicensingStore & Key        If InStr(1, UCase(KeyName), "LICENSE") > 0 Then            RetVal = oReg.DeleteKey(HKLM, KeyName)        End If    Next End If   После выполнения [на клиенте!] должно пустить. Всего записей: 299 | Зарегистр. 30-01-2009 | Отправлено: 16:57 21-02-2011

Компьютерный форум Ru.Board » Компьютеры » В помощь системному администратору » Сброс лицензий

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование