OBTER DNS PREFERENCIAL E ALTERNATIVO

FROSTYNHO 05/07/2011 17:39:30
#378542
estou usando o seguinte codigo postado no exemplo acima para pegar insformações da placa de rede, porém não consigo obter o DNS1 e DNS2 alguem pode me ajudar?
PEGUDO 06/07/2011 09:33:57
#378568 Resposta escolhida 

[txt-color=#0000f0]Dim[/txt-color] Valor [txt-color=#0000f0]As Object
Dim[/txt-color] Vetor() [txt-color=#0000f0]As String[/txt-color]

Valor = [txt-color=#0000f0]My[/txt-color].Computer.Registry.GetValue([txt-color=#e80000][Ô]HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\services\Tcpip\Parameters\Interfaces\{2F1170BE-F695-4CA6-883E-365D62B26255}\75562694D6167656\[Ô][/txt-color], [txt-color=#e80000][Ô]DhcpNameServer[Ô][/txt-color], [txt-color=#0000f0]Nothing[/txt-color])
Vetor = Split(Valor, [Ô] [Ô])

[txt-color=#0000f0]For [/txt-color]A = 0 [txt-color=#0000f0]To[/txt-color] Vetor.Count - 1
    MsgBox([txt-color=#e80000][Ô]Dns [Ô][/txt-color] & (A + 1) & [txt-color=#e80000][Ô]: [Ô][/txt-color] & Vetor(A))
[txt-color=#0000f0]Next[/txt-color]


Cara, eu só não sei se este caminho varia de placa para placa. Eu fiz este exemplo baseado
na minha placa de rede e não testei em outra máquina com outra placa.
Coloca este código no Button1, faça o teste e veja se funciona aí na sua aplicação.
FROSTYNHO 06/07/2011 14:24:14
#378597
PEGUDO, o endereço muda de computador pra computador, mais com esse exemplo seu ja deu pra mim criar oque eu queria, muito obrigado.
Tópico encerrado , respostas não são mais permitidas
Voltar