SUPINFO International University

SUPINFO Institute of Information Technology
Laboratoire Microsoft




Activer Windows en ligne

Accueil > Script > windows_xp > Activer Windows en ligne

Activer Windows en ligne

Par Joachim GOMARD, LABORATOIRE SUPINFO DES TECHNOLOGIES MICROSOFT
Publiée le 24/10/2004 vers 0h.

Description :
Voici un script VBS qui vous permet d'activer Windows sur Internet.

Script :

strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colWindowsProducts = objWMIService.ExecQuery ("Select * from Win32_WindowsProductActivation")

For Each objWindowsProduct in colWindowsProducts
objWindowsProduct.ActivateOnline()
Next



Proposer un script

Notre avis :

Votre avis :

Réactions :
0

Votants :
2

Visites :
16886

1
2
3
4
5




Retrouvez ci-dessous les autres sections du Laboratoire Microsoft