bluesman
Goto Top

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?

Content-Key: 24358

Url: https://administrator.de/contentid/24358

Printed on: April 20, 2024 at 02:04 o'clock

Member: Biber
Biber Jan 24, 2006 at 18:19:22 (UTC)
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
Member: Bluesman
Bluesman Jan 24, 2006 at 20:45:05 (UTC)
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