VBS - Récupérer une clé de registre
Résolu
bezourox
Messages postés
730
Date d'inscription
Statut
Membre
Dernière intervention
-
bezourox Messages postés 730 Date d'inscription Statut Membre Dernière intervention -
bezourox Messages postés 730 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Tout est dans le titre.
En fait je veux récupérer la clé de registre du proxy de Internet Explorer, voir si mes postes ont tous un proxy de configuré dans leur navigateur.
Les valeurs que je souhaite scanner dans le registre :
- HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ ProxyUnable
- HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ ProxyServer
- HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ AutoConfigURL
Il faut ensuite que j'insère ces valeurs à la fin d'un fichier XML existant qui doit avoir un peu cette gueule :
<IE SETTINGS>
<ProxyEnable>0 ou 1</ProxyEnable>
<ProxyServer>@IP du proxy</ProxyServer>
<AutoConfigURL>http://@IP du serveur/fichier.pac</AutoConfigURL>
</IE SETTINGS>
Je ne connais pas le VBS, donc pas gagné... Si une ame charitable tombe sur ce post... on ne sait jamais :)
Tout est dans le titre.
En fait je veux récupérer la clé de registre du proxy de Internet Explorer, voir si mes postes ont tous un proxy de configuré dans leur navigateur.
Les valeurs que je souhaite scanner dans le registre :
- HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ ProxyUnable
- HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ ProxyServer
- HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ AutoConfigURL
Il faut ensuite que j'insère ces valeurs à la fin d'un fichier XML existant qui doit avoir un peu cette gueule :
<IE SETTINGS>
<ProxyEnable>0 ou 1</ProxyEnable>
<ProxyServer>@IP du proxy</ProxyServer>
<AutoConfigURL>http://@IP du serveur/fichier.pac</AutoConfigURL>
</IE SETTINGS>
Je ne connais pas le VBS, donc pas gagné... Si une ame charitable tombe sur ce post... on ne sait jamais :)
A voir également:
- VBS - Récupérer une clé de registre
- Clé de registre - Guide
- Clé usb non détectée - Guide
- Clé d'activation windows 10 - Guide
- Recuperer message whatsapp supprimé - Guide
- Recuperer cle windows - Guide
5 réponses
Bonjour,
Cdlt.
set c=CreateObject("WScript.Shell" ) lol = c.RegRead("HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\Proxyserver") msgbox "Proxy Serveur : " & lol
Cdlt.
ok merci je viens de tester avec 3 clés et ça fonctionne.
en revanche, si une des clé n'existe pas, le script plante :s il faudrait donc faire un controle sur l'existance de la clé.
ensuite, connais tu la fonction qui me permettrait d'écrire cela dans un fichier ?
en revanche, si une des clé n'existe pas, le script plante :s il faudrait donc faire un controle sur l'existance de la clé.
ensuite, connais tu la fonction qui me permettrait d'écrire cela dans un fichier ?
Pour éviter les erreurs et marquer quelque chose :
Cdlt.
Set fs = CreateObject("Scripting.FileSystemObject" ) set c=CreateObject("WScript.Shell" ) AutoConfigURL = "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL" If ExisteCle(AutoConfigURL) = true then AC = c.RegRead(AutoConfigURL) Else AC = "Pas configurer" End if msgbox "AutoConfigURL : " & AC Function ExisteCle( stKey) On Error Resume Next Dim WshShell Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.RegRead stKey ExisteCle = (Err = 0) End function
Cdlt.
Salut,
Bonne poire que je suis, je t'ai fais ton script !
http://www.cijoint.fr/cjlink.php?file=cj201007/cij8nNdvHh.zip
Cdlt.
Ps : n'hésites pas, si besoin d'aide ;)
Bonne poire que je suis, je t'ai fais ton script !
http://www.cijoint.fr/cjlink.php?file=cj201007/cij8nNdvHh.zip
Cdlt.
Ps : n'hésites pas, si besoin d'aide ;)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
Un grand merci, même si j'ai réussi à m'en sortir avec des exemples de code trouvé sur le net.
Par contre je usis ennuyé. Le script est exécuté par le compte admin local, et moi je cherche à récupérer ces 3 valeurs pour l'utilisateur en cours de session (différent du compte admin)
En bref, lorsque j'execute le script, il me retourne rien car le proxy IE du compte admin n'est pas configuré, alorsque l'utilisateur en cours a bien un proxy de configuré.
Je cherche donc maintenant à améliorer ce script pour le rendre utilisable, à savoir récupérer le SID de l'utilisateur en cours avant de récupérer les clés de registre, et là ça se complique car je ne trouve pas grand chose sur le net ...
Un grand merci, même si j'ai réussi à m'en sortir avec des exemples de code trouvé sur le net.
Par contre je usis ennuyé. Le script est exécuté par le compte admin local, et moi je cherche à récupérer ces 3 valeurs pour l'utilisateur en cours de session (différent du compte admin)
En bref, lorsque j'execute le script, il me retourne rien car le proxy IE du compte admin n'est pas configuré, alorsque l'utilisateur en cours a bien un proxy de configuré.
Je cherche donc maintenant à améliorer ce script pour le rendre utilisable, à savoir récupérer le SID de l'utilisateur en cours avant de récupérer les clés de registre, et là ça se complique car je ne trouve pas grand chose sur le net ...
Bonjour,
Je ne comprend pas, car il y a qu'un seul endroit ou se trouve la clé ?
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL
Petite question, ton utilisateur as-t'il les droits de parcourir le registre, c'est peut être pour ça qu'il ne trouve rien !
Cdlt.
Je ne comprend pas, car il y a qu'un seul endroit ou se trouve la clé ?
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL
Petite question, ton utilisateur as-t'il les droits de parcourir le registre, c'est peut être pour ça qu'il ne trouve rien !
Cdlt.