我不确定 Win10 IoT 是否支持 vbscript。
它需要命令行工具“devcon.exe”，
我从更大的解决方案中复制了它，我没有检查丢失的代码。

今天我会用powershell写它。
但是你会明白的。

Set goFileSystem = CreateObject( "Scripting.FileSystemObject" )
Set oWshShell = CreateObject("WScript.Shell")
Set oWshSysEnv = oWshShell.Environment( "PROCESS" )
sTempDir   = oWshSysEnv( "TEMP" )

'Create NIC hardware information
'
'Get all NIC entries (contains present / active and hidden / inactive devices)
sNICAllLogFile       = sTempDir & "\NICAll.log"
sCommandLine = "cmd /c devcon.exe findall =net ""PCI*"" > " &  sNICAllLogFile
lRetVal = oWshShell.Run( sCommandLine, 1, True )
If 0 <> lRetVal Then
   Wscript.Quit (-5)
End If
'Get present NIC (contains only present / active devices)
sNICPresentLogFile       = sTempDir & "\NICPresent.log"
sCommandLine = "cmd /c devcon.exe find =net ""PCI*""> " &  sNICPresentLogFile
lRetVal = oWshShell.Run( sCommandLine, 1, True )
If 0 <> lRetVal Then
   Wscript.Quit (-5)
End If

'Read files with NIC information and compare present NIC with all NIC entries
Set fileAllNIC = goFileSystem.OpenTextFile( sNICAllLogFile, 1, False, 0 )
sPresentNIC = goFileSystem.OpenTextFile( sNICPresentLogFile, 1, False, 0 ).ReadAll()

Do While Not ( fileAllNIC.atEndOfStream )
   aSplitString = Split (fileAllNIC.ReadLine(), ":", -1, 1)
   strLine = Trim(aSplitString(0))
   if instr(1, strLine, "matching device", vbTextCompare) = 0 Then
      'Check if NIC entry " & strLine & " is present..."
      If instr(1, sPresentNIC, strLine, vbTextCompare) > 0 Then
         '-> NIC present. Nothing to do..."
      else
         'Delete obsolete entries
         '-> NIC not present. Removing entry..."
         sCommandLine = "cmd /c devcon.exe remove ""@" & strLine & """"
         lRetVal = oWshShell.Run( sCommandLine, 1, True )
         If 0 <> lRetVal Then
            'Error: devcon failed !
            Wscript.Quit (-5)
         End If
      end if
   end if
Loop