Сообщений в теме: 61

[Romeon]

Антевирусник советую NOD32.v2.50.26.Russian серверная версия

Где взять можна, подскажите

[kidra]

Сохраняется под именем cngvlkw2k3.vbs. Далее в зависимости от навыков печати. Либо запускаем cmd в той же папке, в которой сохранили этот файл, и пишем cscript cngvlkw2k3.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX (вместо последней абракадабры - реальный кей). Либо запихиваем эту строку в другой файл, типа changekey.cmd, и его уже запускаем из консоли.
У меня после запуска написо: Object required 0x1A8. Что делать? SP1 хочу.

Your need open registry editor (Start->Run>RegEdit) and open registry key

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\WPAEvents

then Your must create DWORD key with name "OOBETimer" (without quotes) with random value.
Then try run script again:

'
' Change the Volume Licensing Product Key on a Windows Server 2003
'
' WMI Script - cngvlkw2k3.vbs
'
' This script changes the product key on the computer
'
'******************************************************************
*********

on error resume next
dim new_vol_key

if Wscript.arguments.count<1 then
Wscript.echo "Script can't run without VolumeProductKey argument"
Wscript.echo "Correct usage: cscript cngvlkw2k3.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX"
Wscript.quit
end if

new_vol_key = Wscript.arguments.Item(0)
new_vol_key = Replace(new_vol_key,"-","")


for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf _
("win32_WindowsProductActivation")
' WScript.Echo new_vol_key
result = Obj.SetProductKey(new_vol_key)
if err <> 0 then
WScript.Echo Err.Description, "0x" & Hex(Err.Number)
Err.Clear
end if
Next