bluesman

Netzlaufwerk umbenennen

Brauche Hilfe bei Scriptfehler

Ich hab versucht mit einer Anweisung aus einem frühren Thread meine Laufwerke umzubenennen,
damit statt "Eingang auf "Servername" (pface-smile" nur noch Eingang steht, mit folgendem Skript:

Option Explicit

Dim objNetwork, strDrive, objShell, objUNC
Dim strRemotePath, strDriveLetter, strNewName

strDriveLetter = "P:"
strRemotePath = "\\Server1\Freigabe1"
strNewName = "Name_des_Laufwerks"

Set objNetwork = CreateObject("WScript.Network")

objNetwork.MapNetworkDrive strDriveLetter, strRemotePath

Set objShell = CreateObject("Shell.Application")

objShell.NameSpace(strDriveLetter).Self.Name = strNewName

Wscript.Echo "Check : "& strDriveLetter & " for " & strNewName

WScript.Quit

Dabei bekomme ich die Fehlermeldung Objekt erforderlich: 'NameSpace(...)'

Was ist falsch oder fehlt?
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilen

Content-ID: 24358

Url: https://administrator.de/forum/netzlaufwerk-umbenennen-24358.html

Ausgedruckt am: 18.05.2025 um 14:05 Uhr

Biber
Biber 24.01.2006 um 19:19:22 Uhr
Goto Top
Moin Bluesman,

Was ist falsch oder fehlt?
Kann eigentlich nur noch die Windows-Version oder die Script-Engine-Version sein..
Unter XP Pro (SP2) funktioniert das Script.

Hast Du evtl. Windows 2000?

Grüße Biber
Bluesman
Bluesman 24.01.2006 um 21:45:05 Uhr
Goto Top
Moin Bluesman,

>> Was ist falsch oder fehlt?
Kann eigentlich nur noch
die Windows-Version oder die
Script-Engine-Version sein..
Unter XP Pro (SP2) funktioniert das Script.

Hast Du evtl. Windows 2000?

Grüße Biber


Ja, habe W2k

Gruß
Blues