[Petya V4sechkin]

Nun-Nun, на основе этого скрипта делаем RenameNetworkConnection.vbs

Код:

If WScript.Arguments.Count <> 2 Then
  WScript.Echo "Неверное число параметров." & vbCrLf & _
               "Использование: CScript.exe " & WScript.ScriptName & _
               " <Старое имя интерфейса> <Новое имя>"
  WScript.Quit(1)
End If

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 = WScript.Arguments(0) Then
    objItem.Name = WScript.Arguments(1)
  End If
Next

и запускаем его из батника.