Discussion :

[Monsieur_Dom]

Bonjour à tous
je recherche une solution permettant de récupérer une chaîne de caractère dans un fichier édité depuis la commande suivante :

interface IPv4 show dns 12 >dns.txt

12 étant le numéro index de ma carte réseau.

et voici le résulta de type dns.txt :


Configuration pour l'interface «*Wi-Fi*»
Serveurs DNS configurés via DHCP*: 212.27.40.240
212.27.40.241
Enregistrer avec le suffixe : Principale uniquement


Y a t-il une possibilité pour pouvoir récupérer l'information en rouge ?
merci de vos réponses

[hackoofr]

Avec une Expression Régulière on peut extraire la valeur de DNS2 mais en Vbscript si vous voulez essayer par vous même ce code en admettant que votre fichier est crée dans ce chemin "c:\dns.txt"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub DNS2
Titre="Extraction de la valeur de DNS2"
Dim objFSO,Data,objRegex,Match,Matches
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set Data = objFSO.OpenTextFile("c:\dns.txt",1)
LireTout=Data.ReadAll
msgbox Liretout,64,Titre
Set objRegex = new RegExp
objRegex.Pattern = "\b([0-9]{1,3}\.){3}[0-9]{1,3}\b"
objRegex.Global = True
objRegex.IgnoreCase = True
Set Matches = objRegex.Execute(LireTout)  
    MsgBox "La valeur du DNS 2 est : " & Matches(1),64,Titre
End Sub
DNS2

[Monsieur_Dom]

merci pour votre réponse rapide...
j'ai aussi trouvé une solution... mais en batch.

Cette dernière tient en une ligne :

FOR /F "eol=E skip=3 TOKENS=*" %%a IN ('NETSH interface IPv4 show DNS %12') DO SET DNS2=%%a

echo %DNS2%
pause

En revanche... si il y a plusieurs dns auxiliaires, cela sera le dernier de la liste qui sera utilisé.

Bonne soirée