1. Accueil
  2. Tous les snippets
  3. Snippets Visual Basic / VB.NET
  4. [vbs]script qui ecrit dans un fichier texte la liste des applications installées sur l'ordinateur

[vbs]script qui ecrit dans un fichier texte la liste des applications installées sur l'ordinateur

5/5 (1 avis)

Snippet vu 13 164 fois - Téléchargée 22 fois

Commenter

Contenu du snippet

Ben voila j'ai fini, mais bon il y a un souci ce script affiche bien la liste dans un fichier texte ( il faudra modifier la racine si vous voulez l'utiliser) maius ce script necessite le composant activeX regedit qui n'est pas gratuit (enfin 60 jours puis après 40$ donc environ 35 ?) Ceci est bien gênant et je chercher deja un autre moyen de faire ou bien si quelqu'un sait comment récupérer cet activeX gratuitement je l'écoute!!!! Je reste donc à votre disposition pour des indications futures ou si vous avez trouver une solution a ce probleme qui n'est négligeable

Source / Exemple : 


'The script writes all installed software on the computer.
dim a
Const ForAppend = 8	
Set WshShell = CreateObject("Wscript.Shell")							
Set Shell = WScript.CreateObject("Scripting.FileSystemObject")			
Set fichier = Shell.OpenTextFile("Y:\Perso\NomApp1.txt", ForAppend, True)

Fichier.write(" ---------- " & Now & " ---------- " & vbcrlf)	

 Set S = CreateObject("RegEdit.Server")
 For Each Key In S.Keys("SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall").SubKeys
    If Key.ExistsValue("DisplayName") Then 
       a = Key.Values("DisplayName").Value
		fichier.write(a & vbcrlf)	   
      End If
  Next

A voir également

Ajouter un commentaire Commentaires
G4industri
Messages postés
6
Date d'inscription
mardi 18 octobre 2005
Statut
Membre
Dernière intervention
14 mai 2007
22 févr. 2007 à 09:32
Il esxiste une solution sans le ActiveX du RegEdit et qui fonctionne à merveille:
http://www.vbfrance.com/code.aspx?ID=38060
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (honginator)