Tom's Guide > Forum > Programmation > Afficher les serveurs Dns avec du vbs
Mot :    Pseudo :           
 

Bonjour à tous,

 

J'ai voulu récupérer les Adresses Dns (Dns Primaire et secondaire )mais je n'arrive pas à trouver le code pour, alors que le code pour Wins j'ai trouvé.

 

Voici mon code:

 
Code :
  1. StrComputer= "."
  2. Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
  3. if
  4. Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled = true",,48)
  5. For Each objItem in colItems
  6.     Msgbox "Serveur primaire wins : " &  objItem.WINSPrimaryServer
  7.  
  8.   Msgbox "Serveur secondary wins: " & objItem.WINSSecondaryServer
  9.  
  10. ' Pas sûr, car ca n'affiche rien lol 
  11. Msgbox "Serveur Dns : " objItem.DNSPrimaryServer
  12.   ' Pas sûr, car ca n'affiche rien non plus lol 
  13.   "Serveur Dns 2: "  & objItem.DNSPrimaryServer
  14. Next
 

Avez-vous une idée comment je pourrai récupérer les Adresses Dns comme ceux qu'on trouve avec IpConfig/all?

 


Merci


Message édité par OmaR le 21-08-2007 à 23:53:41
Liens sponsorisés
Inscrivez-vous ou connectez-vous pour masquer ceci.

Tu pourrais pas exécuter un ipconfig /all, avec une commande VBScript ?

Comme WScript.Exec() ?

------------------------------ Les dessins des seins ou les desseins des saints ?
Répondre à OmaR

OmaR a écrit :

Tu pourrais pas exécuter un ipconfig /all, avec une commande VBScript ?

Comme WScript.Exec() ?



Salut Omar,

Si je peux, mais ca fonctionne juste avec la machine local,
mais moi je veux récupérer l'info d'une machine distante

Répondre à stephane81

Dans ce cas, je ne peux pas t'aider... désolé

------------------------------ Les dessins des seins ou les desseins des saints ?
Répondre à OmaR

OmaR a écrit :

Dans ce cas, je ne peux pas t'aider... désolé



merci comme même

Répondre à stephane81
Tom's Guide > Forum > Programmation > Afficher les serveurs Dns avec du vbs
Aller à :

Il y a 2041 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici.

Attention

Vous allez répondre sur un sujet resté inactif pendant plus de 6 mois.
Assurez-vous d'apporter des éléments nouveaux à la discussion avant de poursuivre.

Répondre Annuler
Liens