Netzwerkadapter umbenennen – VB Script

Computer werden in Firmen und Unternehmen oft mit dem Microsoft SCCM oder Matrix42 Empirum installiert. In manchen Anwendungsfällen ist es ein Muss, dass die Netzwerkadapter den selben Namen haben. Zum einen kann ein “Schönheitsfehler” behoben werden, zum anderen ist es zur Übersichtlichkeit. Wenn man den Adapter zum Beispiel “INTERNAL” und “EXTERNAL” benennt, weiß man sofort mit welchem Netzwerk man verbunden ist. Diese Netzwerkadapter umbenennen ist kein Hexenwerk. Das realisieren wir mit einem VB Script, welches in die Installationsroutine eingebaut wird.

Fotocitizen / Pixabay

Netzwerkadapter umbenennen – VB Script (VBS)

Um nun die Netzwerkadapter wie LAN Apapter, WLAN Adapter oder VPN Adapter umzubenennen, verwenden wir ein VB Script.

Folgendes Codeschnipsel kopieren wir und speichern uns unter “rename-networkadapter.vbs” ab.

Const NETWORK_CONNECTIONS = &H31&

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(NETWORK_CONNECTIONS)

Set colItems = objFolder.Items
For Each objItem in colItems
    If objItem.Name = "LAN-Verbindung" Then
        objItem.Name = "INTERNAL"
    End If
Next

• Zeile 8: “alter Name des Netzwerkadapters”
• Zeile 9: “neuer Name des Netzwerkadapters”

Nach ausführen des Scripts, werden die Netzwerkadapter umbenannt. Natürlich kann das Script ohne Probleme angepasst, bzw. erweitert werden. 🙂

Ein VB Script kann aber noch mehr: