Suchen Sie nach Laufwerken aus der Datei VBS neu zuordnen

0

Ich bin sehr neu bei VBS. Ich versuche, ein Tool zu entwickeln, das bei der Migration von Benutzern für eine Aktualisierung hilfreich ist. Ich muss Drucker und Laufwerkszuordnungen des aktuellen Benutzers auf einem Computer abrufen, in eine Datei exportieren, die Datei auf einen neuen Computer kopieren und diese Datei dann importieren. (keine Registry-Interaktion)

Der Druckerbereich, den ich bereits habe, sind die zugeordneten Netzlaufwerke, die ein Problem sind. IBelow ist das Skript zum Exportieren.

Set objFSO = CreateObject("Scripting.FileSystemObject")

Const ForAppending = 8

Set objTextFile = objFSO.OpenTextFile _
 ("C:\Mapped_Drives.txt", ForAppending, True)


Set objNetwork = WScript.CreateObject("WScript.Network")
Set colDrives = objNetwork.EnumNetworkDrives
For i = 0 to colDrives.Count-1 Step 2
 objtextfile.writeline (colDrives.Item(i) & vbTab & colDrives.Item (i + 1))
Next
objtextfile.close

Dadurch wird eine Datei erstellt, die so aussieht

P: \ server \ share

Z: \ server \ share

Y: \ server \ share

Ich versuche, eine Möglichkeit zu finden, um diese Informationen für denselben Benutzer in den neuen Computer zu importieren. Jede Hilfe wäre motiviert.

Vielen Dank,


quelle
Hilft das ?
Ansgar Wiechers

Antworten:

0

.OpenTextFile () die exportierte Datei ForReading, Loop bis .AtEndOfStream, .ReadLine () jede Zeile, Split () auf vbTab (Plausibilitätsprüfung), Feed der beiden Elemente des Split () -Arrays an .MapNetworkDrive.


quelle