Clickeo en el link de descarga y me lleva a otra pagina con monton de dlls... y no aparece nada de pnputil....

otro intento?. jejejje

Disculpa... pero tu link, me lleva a la descarga de egon... que ni idea de lo que es.

Si pudieras poner otro link.

Muchas gracias

Alguien me puede decir de donde descargar el PNPUTIL.EXE.
 
Juraria que viene con algun kit de windows, pero no doy con el.
Alguna informacion al respecto?.

Gracias

el comando "netsh lan export profile" exporta toda la configuracion lan?.

Osea, importa el grupo de trabajo, netbios, compartir impresoras y archivos...???

Esto es lo que e hecho por ahora. va muy bien.

Imports System
Imports Microsoft.Win32
 
Class Reg
 
 
    Public Shared Sub Main()
        Dim rk As RegistryKey = Registry.LocalMachine.OpenSubKey("SYSTEM\CurrentControlSet\Control\Network", False)
        PrintKeys(rk)
        Console.ReadKey()
    End Sub
 
 
    Public Shared Sub PrintKeys(ByVal rkey As RegistryKey)
 
        Dim names As String() = rkey.GetSubKeyNames()
        Dim i As Integer = 0
        Dim s As String
        For Each s In names
 
            Dim registro As RegistryKey = Registry.LocalMachine.OpenSubKey("SYSTEM\CurrentControlSet\Control\Network\" & s, False)
 
            Dim e
 
            For Each e In registro.GetSubKeyNames()
 
                'MsgBox("SYSTEM\CurrentControlSet\Control\Network\" & s & e)
 
                Dim res As RegistryKey = Registry.LocalMachine.OpenSubKey("SYSTEM\CurrentControlSet\Control\Network\" & s & "\" & e, False)
                Dim ase As String
 
                For Each ase In res.GetSubKeyNames()
                    MsgBox("SYSTEM\CurrentControlSet\Control\Network\" & s & "\" & e & "\" & ase)
                    Dim res1 As RegistryKey = Registry.LocalMachine.OpenSubKey("SYSTEM\CurrentControlSet\Control\Network\" & s & "\" & e & "\" & ase, False)
                    Dim ase1 As String
 
                    For Each ase1 In res1.GetValueNames()
 
                        If ase1 = "PnpInstanceID" Then
                            Console.WriteLine(ase1)
                        End If
 
                    Next ase1
                Next ase
            Next e
        Next s
    End Sub
End Class
 

Ahora me falta ver el contenido de esa clave y compararla con la que tengo.

Tienes razon... es null.
Pero ahora como hago para detectar si es null para seguir con el for?

Al final e optado por buscar en el regedit el valor que me da el programa que es "ROOT\NET\XXXX"
Y a esa key le cambio el parametro name.

Aver que tal.

No sabras donde ahi algun ejemplo de getadapterinfo en vb.net verdad?.

Todo lo que encuentro esta en vb 6 o c#

No, en serio... te quedas conmigo o que...

Claro que es a codigo hombre claro.