Mise en forme informations issues des cartes réseaux
Bonjour à tous,
Voila mon petit probleme (qui va être résolu en 2s 3 dixièmes)
J'ai un fichier vbs pour connaître les infos du pc:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| on error resume next
set IPConfigSet = GetObject("winmgmts:{impersonationLevel=impersonate}!//" & Computer).ExecQuery _
("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled=TRUE")
If Err.Number<>0 Then
wscript.echo " - non accessible -"
Else
for each IPConfig in IPConfigSet
wscript.echo " Configuration réseau de l'ordinateur " & computer & vbcrlf & vbcrlf & _
" Carte " & vbtab & vbtab & " : " & IPConfig.Description & vbcrlf & _
" adresse MAC " & vbtab & " : " & IPConfig.MACAddress & vbcrlf & _
" adresse IP " & vbtab & " : " & IPConfig.IPAddress(0) & vbcrlf & _
" DNSHostName " & vbtab & " : " & IPConfig.DNSHostName
Next
End If |
Mais le probleme c'est que je ne connais pas une suel ligne de commande en vbs ni en rien d'autre à part dos...
Et je voudrais simplement rajouter un titre a cette fenetre...
Et j'ai cherché partout et je ne trouve pas....
Merci part avance...
Crunch...
