Jump to content

Recommended Posts

Posted

I have always used the method below to activate my os during ua, but now with the new ms patch windows interupts the install after the os has installed prior to runonceex & halts the install until I click activate windows now or later bla bla :lol:

» Backup Activation Method

To begin this method, you must have access to the system you're planning on activating, and have it already activated. For home users this is simple, as Windows needs to be activate after 30 days, and most likely you're planning on using your CD/DVD on this system.

Once your system is activated, navigate to your system32 directory within your Windows directory, and locate the file WPA.DBL. This is your activation file.

Once you have located the WPA.DBL file, copy it to $OEM$\$$\system32 in your Windows Setup Source. That's it, you're done.

Remember that if you decide to use a virtual machine, that this method will fail, as the virtual system will look different to the OS from your host system.

Am I missing something? Anything else required in the ans file to overcome this prob?

Cheers

MC.


Posted

I would imagine that there must be a script somewhere around here to perform activation. Microsoft exposes activation through WMI, so it's easily scriptable.

Posted
I would imagine that there must be a script somewhere around here to perform activation. Microsoft exposes activation through WMI, so it's easily scriptable.

Thanks Rogue

Didn't think it was workin properly Autoactivate=yes does but I don't like to be connected to the net under an install condition.

Any chance of enlightening me Rogue?

Wmi way above my noggin, however willin to learn?

Cheers

MC.

Posted
Hello

Have you had a look at this:

Activation

Works well for me...

Cheers

& Welcome AndrewParker

WTF, thats what I posted DID I NOT??, cut directly from the ua guide. know I carry on like a nube sometimes..

Ridiculous?

Nuf of my rant, appears its not working as many members have remarked here thanks.

Cheers

MC.

Posted
This script is an excerpt from http://www.microsoft.com/technet/prodtechn...oy/wpadepl.mspx

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").
InstancesOf ("win32_WindowsProductActivation")
if Obj.ActivationRequired <> 0 then
'If necessary, save/set proxy
Obj.ActivateOnline()
'If necessary, restore proxy
end if
next

Yeah Thanks man theres certainly some reading to be done not well into VB scripts that is not like our Gun, GSM here.

Cheers

MC.

Posted

nice article, but how does one actually use that if the wpa.dbl method no longer works, or do i mis-understand this thread, which is highly likely.

oioldman

Posted

Hello

Have you had a look at this:

Activation

Works well for me...

Cheers

& Welcome AndrewParker

WTF, thats what I posted DID I NOT??, cut directly from the ua guide. know I carry on like a nube sometimes..

Ridiculous?

Nuf of my rant, appears its not working as many members have remarked here thanks.

Cheers

MC.

-------------------

Clam down, can someone not make a simple mistake sometimes, I pasted the wrong url, have a look here:

http://www.msfn.org/board/index.php?showtopic=63258

Posted

I have no idea if this will help you I spent 5 minutes reading the link provided and this

is the script I came up with. I do not know if WMI can be used during a install, never tried

it. I have tested this so there are no run time errors.

I have it so you can manually add the key, but I have left some comment out section

that can be used to automate the process.

Save As ActivateXP.vbs

Dim UserAddKey 
'/-> Remove the Comment Before The Dim Below And You Can Place The Key There
' Dim myProdKey : myProdKey = "PLACE_KEY_HERE"
For Each Obj In GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
If Obj.ActivationRequired = 0 Then
WScript.Echo "Product Activation : No Need To Activate This Product"
Else
'/-------------------------------------------------------------------------------------------\
'/-> Add The Key With User Input If Using myProdKey This Below Here Is Safe To Delete
UserAddKey = InputBox(CreateObject("Wscript.Shell").ExpandEnvironmentStrings("%UserName%") &_
", Windows XP must be activated" & vbCrLf & "Please type in the Windows Product Key","XP Key",,5500,4800)
Obj.SetProductKey(UserAddKey)
'/-> Add The Key With User Input If Using myProdKey This Above Here Is Safe To Delete
'/-------------------------------------------------------------------------------------------\
'/-> Uncomment This If You Have Placed The Key In The myProdKey
' Obj.SetProductKey(myProdKey)
Obj.ActivateOnline()
End If
Next

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...