Discussion :

[topino]

Bonjour à tous ,

Je travaille sur un soft apellé BgInfo . Son principe est d'indiquer les informations du systèmes
comme : la mémoire , la version du bios, etc...

Pour pouvoir afficher ces informations , on passe par une interface qui nous laisse le choix du languge a adopter
pour afficher l'information que l'on souhaite.

Mon problème est le suivant : je souhaite afficher les informations sur le ShadowCopy mais Bginfo a deja un Script en WMI tout fait. Le truc c'est qu'il affiche toutes les copys effectuaient depuis le lancement du shadowcopy .
J'aurais aimé savoir si il était possible de créer un script vbs pour n'affiche que les 5 dernieres copys .

Voila merci d'avance

Voici le code en WMI query donné par Bginfo : SELECT InstallDate FROM Win32_ShadowCopy

[RadPAT]

Salut,

tu peux essayer pour voir :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT Top 5 InstallDate FROM Win32_ShadowCopy

A++

[topino]

Je te remerçie pour ta réponse mais cette solution ne marche pas . Il me marque ce message : (Query not in form 'SELECT xxx FROM....')

[ced600]

Je ne pense pas que cela soit possible uniquement par la requête.
Tu récupères une collection une liste, normalement, il te suffit de la parcourir et de vérifier la bonne propriétés pour récupéré les 5 dernières copy. Certainement à l'aide d'une propriété contenant une date.

[topino]

Je te remercie. Je pensais avoir trouvé mais il se trouve qu'il n'affiche que les derniers au moment du deployement du script. Ce que je cherche , avec l'aide du Bg Info , c'est que le raffréchissement se face tout seul.
Je ne vais pas mettre le script que j'ai trouvé sur ce topic car il est assez imposant.
Si quelqu'un aurait le temps ou serait curieux, laissez vos addresse mail ou msn ici et je vous enverrais mon script.

Cdlt

[RadPAT]

Salut,

a priori BGInfo n'a pas été concu pour mettre à jour en temps réél les infos.
Eventuellement, tu peux lancer un script de mise à jour dans les taches plannifiées...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Set objShell = CreateObject("WScript.Shell")
 
Commande = "c:\windows\system32\bginfo.exe c:\windows\system32\BGInfo.bgi /timer:0 /silent"
objShell.Run Commande
 
wscript.quit

A++