
'
' WMI Script - ChangeVLKey.vbs
'
' This script changes the product key on the computer
'
'***************************************************************************
ON ERROR RESUME NEXT
if Wscript.arguments.count<1 then
Wscript.echo "Script can't run without VolumeProductKey argument"
Wscript.echo "Correct usage: 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,"-","") 'remove hyphens if any
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
27HJH-MV4BT-Y3TDW-6KWT6-JHPM2
tutu napisał(a):Jezeli ktos bylby tak mily i poprowadzil mnie za ,,raczke",bylbym dozgonnie wdzieczny.z gory dziekuje
Tomaszek napisał(a):P@blo napisał(a):Wystarczy podmienić bibliotekę: LegitCheckControl.dll
http://www.giw.internetdsl.pl/Microsoft.Windows.Update.WGA.Check.Cracked-ViLLAGERZ.zip
Tomaszek niestety ten link nie dziala
http://www.giw.internetdsl.pl/Microsoft.Windows.Update.WGA.Check.Cracked-ViLLAGERZ.zip
Installation:
1) Clear MSIE cookies and its cache, including offline files.
2) Copy LegitCheckControl.DLL over the original one in %systemroot%\system32\ directory.
3) Reboot your computer.
4) Start MSIE and delete cookies and cache once again yet! It's very important!
5) Close MSIE.
6) Go to START -> Windows Update and the validation check shouldn't be there anymore!
pierrote napisał(a):witam
Mam pytanie.Czy zmieniając klucz w XP na numer legalny będzie można ściągać uaktualnienia.
pierrote napisał(a):ale czy będzie można ściągać uaktualnienia na dwóch komputerach z tym samym kluczem
Użytkownicy przeglądający to forum: Brak zarejestrowanych użytkowników oraz 13 gości