Почему это меняет имя на подключенном диске M и G, а не только на M

Я написал это VBS (включен ниже) на основе ответа здесь: переопределить имя подключенного диска с помощью сценария.bat?

Как указано в моем заголовке, этот код обновляет метку для диска M и G, но должен обновлять только диск M. Оба идут в соответствующее (другое) местоположение.

' rename network map.vbs
' VBScript to map a network drive.
' Authors Guy Thomas and Barry Maybury
' Version 1.4 – April 2010
' April 2019, Gary Baddorf - function-ized it
' —————————————-
 Option Explicit
NameDrive "\\ad.hs.net\shared", "M:", "CH (\\ad.hs.net\shared\)"

WScript.Quit

Sub NameDrive(strRemotePath, strDriveLetter, strNewName)
    Dim objNetwork, objShell, err
    Set objShell = CreateObject("Shell.Application")
    Set objNetwork = CreateObject("WScript.Network") 

    ' Section to map the network drive
    On Error Resume Next
    objNetwork.RemoveNetworkDrive strDriveLetter
    If Err.Number <> 0 Then
      WScript.Echo "Error: " & Err.Description
      Err.Clear
    End If 
    objNetwork.MapNetworkDrive strDriveLetter, strRemotePath

    ' Section which actually (re)names the Mapped Drive
    objShell.NameSpace(strDriveLetter).Self.Name = strNewName

    Wscript.Echo "Check "& strDriveLetter & " for " & strNewName
    objNetwork.Dispose()
    objNetwork = Nothing
    objShell.Dispose()
    objShell = Nothing
End Sub

Обратите внимание, я могу переключиться в этой строке, и он ничего не делает:

NameDrive "\\ad.hs.net\shared", "G:", "CH2"

Дополнительная информация. Я могу наблюдать MountPoints2 в редакторе реестра для каждого сетевого пути, и значение _LabelFromReg является правильным для каждого диска. Я также удалил их и снова запустил скрипт безуспешно.