Changement clé Office 2010

Question

Bonjour,

Je me tourne vers vous car je souhaiterai faire un script qui me permette de modifier et d'activer une clé Office 2010.
 Sur un master, nous avons installé un office 2010 e-academic et lors de l'installation il est obligatoire de saisir une clé. Pour ensuite pouvoir la modifier et l'activer, car chaque étudiant possède sa propre clé d'activation, nous sommes obligé de passer par les lignes de commandes :

cscript "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" /inpkey:XXXXX-XXXXX-XXXXX-XXXXX-XXXXX

cscript "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" /act

Notre but est donc d'avoir un icone sur le bureau qui demande la licence Office à l'étudiant et s'occupe d'exécuter ses lignes en tant qu'administrateur.

On m'a fourni le code si-dessous mais qui ne fonctionne pas
Set WshShell = WScript.CreateObject("WScript.Shell") 
sKey = inputbox("Veuillez saisir votre Clé office")
if sKey <> "" then 
shRegKey = Wshshell.run ("cscript " & chr(34) & "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs " & chr(34) & "/inpkey:" & sKey,1,1)
shAct = Wshshell.run ("cscript " & chr(34) & "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs " & chr(34) & "/act" ,1,1)
else
msgbox "Pas de clé saisie, abandon de l'enregistrement."
end if

En vous remerciant par avance pour votre aide.

nhervagault · Answer

Salut,

Quel est le message d'erreur?

Est-ce bien le bon text généré par tes commandes.

Les shRegKey  et shAct  sont-ils nécessaires

Les 2 scripts sont peut etre à mettre dans une meme session 
est-ce que 2 run à suivre fonctionne (il y a peut etre une notion de transaction ou autre)


C'est des pistes mais comme on a pas l'erreur on ne peut pas repondre!!

cs_stephane031 · Answer

Bonjour,

Il n'y a pas de message d'erreur. Juste une fenêtre cmd qui s'affiche beaucoup trop vite pour savoir ce qu'elle fait.

Ensuite, je ne suis pas du tout développeur ! Donc je suis incapable de te dire si shRegKey et shAct sont nécessaires... 

Je suis honnête, quand je ne sais pas faire je demande aux autres ! Et quand je sais faire, je renvoie l'ascenseur :)

nhervagault · Answer

si tu lances le script à partir d'un cmd 
Ca donnes quoi?

Et le texte généré est-il bon?
test avec un msgbox par exemple.

cs_stephane031 · Answer

Quand je lance le vbs, j'ai bien la msg box qui apparaît et me demande de saisir la licence Office.
Si je ne rentre rien, j'ai bien le message comme quoi il n'y a pas de clé saisie. 

Si je rentre la clé et que je valide, j'ai l'impression qu'il lance quelque chose mais ça va très vite et je n'ai pas le temps de voir ce qui se passe.

Quand au script : 
cscript "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" /inpkey:XXXXX-XXXXX-XXXXX-XXXXX-XXXXX

cscript "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" /act

il fonctionne quand je le fait manuellement ou à partir d'un fichier .bat
La première ligne rentre la clé et la deuxième Active le pack Office avec un message de confirmation à la fin dans la fenêtre CMD.

madaal · Answer

Si tu veux le voir aller plus lentement. Met des System.Threading.Thread.Sleeàp(100) (ou System.Threading.Sleep j'ai un blanc) Entre tes actions.

Changement clé Office 2010

5 réponses

Votre réponse

Discussions similaires