

Set objRegExp = CreateObject("Vbscript.RegExp") Set objScript = CreateObject("WScript.Shell") 'Pass computer name from Lansweeper to script You will need the following in your Lansweeper server's action path:ĪctivateWindows.vbs (create from the code below) In short, this script does the following: uninstalls current key, installs new key that you typed in, activates online, and then displays the licensing status for that computer. This will even work for MAK keys as we use it activate our servers with the correct MAK after deployments. For OEM computers that shipped with Win 8 please visit this site to find out how to record the OEM key since I know people are going to ask.

We utilize "Comments" page to record the OEM product key as part of our SOP when we acquire new computers to make a record of the OEM key and to easily copy and paste if we need to activate after an new image is applied.

We have a mixed Win 7/8.1 environment so this was the need for using PsExec since a Win 8 slmgr.vbs script will not activate a Win 7 machine and vise versa. I thought I share a great custom action that uses a Vbscript that I created to aid in our OEM activation process if one of my tech's forget to activate Windows after using MDT to image a machine as we use OEM versions of Windows Pro.
