Discussion :

[kofky0]

Bonjour,

je souhaiterais écrire le contenu de cette clé de registre dans un fichier txt:

HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\SearchList

Avez vous un exemple de bout de code qui me permettrait de recuperer le contenu de cette clé de registre? toutes me tentatives ont ete infructueuses...


Merci

[SfJ5Rpw8]

Code :

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

1
2
3
4
 
Dim oWshShell
Set oWshShell = WScript.CreateObject("WScript.Shell")
WScript.Echo oWshShell.RegRead("HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\SearchList")

[kofky0]

Merci a toi! j avais trouvé en meme temps que ta réponse et qd a l'export en fichier txt du resultat?

Jai fait ce code qui exporte ds un fichier export.txt mais je n'obtient pas de resultat. le fichier est crée mais vide:

Code :

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

1
2
3
4
5
6
7
8
9
Dim oWshShell
Set fsobj = CreateObject("Scripting.FileSystemObject")
Set tf = fsobj.CreateTextFile("export.txt", True)
Set oWshShell = WScript.CreateObject("WScript.Shell")
 
tf.Write (oWshShell.RegRead("HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\SearchList"))
 
 
tf.Close

[ced600]

J'ai testé ton code.

Cela marche.

Fichier vide de texte comme toi

J'ai regardé dans la BDR et là qu'est ce que je vois dans Parameters :
Pas de SearchList

Tout fonctionne très bien, ta clé n'existe pas c'est tout