Alexander A Manaeff -

 
 

Как сменить ключ Windows XP

Ответить


Этот вопрос предназначен для предотвращения автоматической отправки форм спам-ботами.
Смайлики
:| :) :wink: :D :lol: :( :cry: 8) :o :oops: :? :x :P :evil: :twisted: :roll: :!: :?: :idea: :arrow: :mrgreen:
Ещё смайлики…
BBCode ВКЛЮЧЁН
[img] ВКЛЮЧЁН
[flash] ВЫКЛЮЧЕН
[url] ВКЛЮЧЁН
Смайлики ВКЛЮЧЕНЫ
Обзор темы
   

Развернуть Обзор темы: Как сменить ключ Windows XP

Как сменить ключ Windows XP

Сообщение UncleFather » 15 июл 2011 14:17, Пт

Бывает, необходимо сменить CD-Key у Windows XP. Можно, конечно, скачать какую-либо программку, но лично мне больше понравился способ:
Создаем файл VB скрипта, например changekey.vbs со следующим кодом:
Код: Выделить всё
'
' Сценарий WMI — Changekey.vbs
'
' Этот сценарий изменяет на компьютере ключ программного продукта
'
'***************************************************************************

ON ERROR RESUME NEXT

if Wscript.arguments.count<1 then
   Wscript.echo "Нельзя запустить сценарий без аргумента VolumeProductKey argument"
   Wscript.echo "Правильное использование: Cscript ChangeVLKey.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX"
   Wscript.quit
end if

Dim VOL_PROD_KEY
VOL_PROD_KEY = Wscript.arguments.Item(0)
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'удалить дефисы, если они есть
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\WPAEvents\OOBETimer" 'delete OOBETimer registry value
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

   result = Obj.SetProductKey (VOL_PROD_KEY)

   if err <> 0 then
      WScript.Echo Err.Description, "0x" & Hex(Err.Number)
      Err.Clear
   end if

Next


Либо качаем готовый файл скрипта:
changekey.rar
Changekey.vbs
(1.74 КБ) Скачиваний: 1008


и запускаем его с указанием номера нового ключа, например:
Код: Выделить всё
changekey.vbs ХХХХХ-ХХХХХ-ХХХХХ-ХХХХХ-ХХХХХ


Если все прошло нормально, скрипт не выдаст никаких сообщений, а после перезагрузки Windows XP попросит повторной активации.

Вернуться к началу

cron
Alexander A Manaeff -
@Mail.ru .