Windows Activation

[pfenton]

Has anybody written a report that lists windows activation status?

[Hendrik_VE]

Didn't try this out yet, but you could create a deployment package that runs the following PowerShell command:
$WinVerAct = (cscript /Nologo "C:\Windows\System32\slmgr.vbs" /xpr) -join ''

Write this into a custom registry key, and scan the registry key with Lansweeper.

New-Item –Path "HKLM:\Winact" –Name Activation

New-ItemProperty -Path "HKLM:\Winact\Activation" -Name "Winveract" -Value $WinVerAct -PropertyType "String"


Then create an appropriate report.

Something like that 🙂

[EtienneB]

Hi.
Also not working for me.
Showing all the assets on the report.

[cesar_ti]

it didn't work took all of them as activated

[endyk]

Hello,

I found one that I slightly modified. Hope it helps.

Select Top 1000000
    Case
        When tblComputersystem.Domainrole > 1 Then
            'Server'
        Else
            Case
                When Coalesce(tblPortableBattery.AssetID, 0) = 0 Then
                    'Desktop'
                Else
                    'Laptop'
            End
    End                           As Type
  , tblOperatingsystem.Caption    As Operatingsystem
  , tblAssetCustom.Manufacturer   As Vendor
  , tsysAssetTypes1.AssetTypename As [Asset Type]
  , tblAssetCustom.Model
  , tblAssets.AssetUnique
  , tblAssetCustom.Serialnumber   As [Service Tag Number]
  , tblAssetCustom.Custom5        As AssetTag
  , tblAssetCustom.Contact        As [Allocated ID]
  , tblADusers.Displayname
  , tblState.Statename            As [Asset state]
  , tblAssetCustom.Custom3        As [PO Number]
  , tblAssetCustom.PurchaseDate
  , tblAssetCustom.Warrantydate   As [Warranty End Date]
  , tblAssetCustom.Custom2        As [Invoice number]  
  , tblAssets.Domain
  , tblAssetCustom.AssetID
  , tblAssets.Lastseen
From tblAssetCustom
    Inner Join tblAssets
        On tblAssetCustom.AssetID = tblAssets.AssetID
    Inner Join tblOperatingsystem
        On tblAssets.AssetID = tblOperatingsystem.AssetID
    Inner Join tsysAssetTypes    tsysAssetTypes1
        On tsysAssetTypes1.AssetType = tblAssets.Assettype
    Inner Join tblAssetGroupLink
        On tblAssets.AssetID = tblAssetGroupLink.AssetID
    Inner Join tblAssetGroups
        On tblAssetGroups.AssetGroupID = tblAssetGroupLink.AssetGroupID
    Inner Join tsysAssetTypes
        On tsysAssetTypes.AssetType = tblAssets.Assettype
    Left Join tblADusers
        On tblADusers.Username = tblAssets.Username
           And tblADusers.Userdomain = tblAssets.Userdomain
    Left Join tsysIPLocations
        On tblAssets.IPNumeric >= tsysIPLocations.StartIP
           And tblAssets.IPNumeric <= tsysIPLocations.EndIP
    Inner Join tblComputersystem
        On tblAssets.AssetID = tblComputersystem.AssetID
    Left Join tblPortableBattery
        On tblAssets.AssetID = tblPortableBattery.AssetID
    Inner Join tblState
        On tblAssetCustom.State = tblState.State
Where tsysAssetTypes1.AssetTypename = 'Windows'
      And tblAssetCustom.State = 1
Order By tblAssets.AssetName