Utiliser WSH pour acceder à la base de registre

cs_pitchoo Messages postés 6 Date d'inscription vendredi 17 janvier 2003 Statut Membre Dernière intervention 29 janvier 2003 - 24 janv. 2003 à 12:10
cs_pitchoo Messages postés 6 Date d'inscription vendredi 17 janvier 2003 Statut Membre Dernière intervention 29 janvier 2003 - 24 janv. 2003 à 12:58
Je souhaite vérifier si excel est installé sur la machine en testant une clé, or ce test ne marche pas il me renvoi l'erreur 424 "un objet est requis "

Dim acces_shell
Dim cle As String
-> Set acces_shell = wscript.CreateObject("Wscript.Shell")
cle = acces_shell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\9.0\Excel\InstallRoot")
MsgBox "Cle = " & cle

Faut il installer ajouter une reference au projet?

merci de votre aide

1 réponse

cs_pitchoo Messages postés 6 Date d'inscription vendredi 17 janvier 2003 Statut Membre Dernière intervention 29 janvier 2003
24 janv. 2003 à 12:58
Finalement c'etait une erreur de syntaxe
le script suivant fonctionne parfaitement

Dim acces_shell
Dim cle As String
Set acces_shell = CreateObjectwscript("Wscript.Shell")
cle=acces_shell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\9.0\Excel\InstallRoot\path")
MsgBox "Cle = " & cle
0
Rejoignez-nous