[Résolu] Redémmarer un ordinateur en vbs !

[bibi26]

Bonjour,

 

Je fais un petit logiciel qui optimise le démarrage de windows, en gros, presque tout est finit, mais j'aimerai que le logiciel redémmare l'ordinateur lui-même (sa fait, selon moi, plus sympa), ce que j'espère pouvoir faire en vbs. Je cherche et je trouve peu de codes, ou du moins, seulement 1 :

 

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

Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
objOperatingSystem.Reboot()
Next

 

Le code ferme bien l'antivirus, les autres logiciels comme avant de redémmarer, mais l'ordinauter ne redémmare pas :'(

 

Existe t-il un code pour redémmarer l'ordinateur en vbs ?

 

Merci d'avance !

Modifié le 8 février 2006 par bibi26

[angelique]

ce .vbs est pourtant bon pour faire rebooter le pc

Les espaces à vérifier peut etre!!

[bibi26]

Ok, la sa fonctionne, j'ai trouver le problème.

 

Merci quand même

 

 

Le problème était que à chaque fois que le logiciel est démmaré, sa crée certains fichiers temporaire, par erreur ce fichier là était temporaire, donc il était supprimé après la fin du logiciel (soit, quand il devait redémarrer l'ordinateur) et ne redémarrait pas complètement l'ordinateur, j'ai corriger ce bug et voila, sa fonctionne

Modifié le 8 février 2006 par bibi26

[cru&cui]

S'Lut

 

.....Et on pourrai avoir le VBS apres la correction du bug ?

 

Abtot

[bibi26]

Le vbs est le même, c'était juste une erreur au niveau de comment je l'exécutai