Alle Netzlaufwerke via VB-Script trennen

[Thorre 10]

Hallo zusammen

 

Ich möchte, dass beim Anmelden alle vorhandenen Netzlaufwerke mit Hilfe eine VB-Scripts getrennt werden.

Wer kann mir dazu ein paar Tipps geben. Bin leider noch nicht so Fit mit Scripting aber das wird schon noch.

 

Gruss

Thorre

[Damian 1.670]

Hi.

 

Muss es unbedingt ein VB-Script sein? Geht auch einfach per Batch mit dem Befehl net delete.

 

Damian

[Egli 10]

Hallo,

 

muss es ein VB-Script sein oder reicht vielleicht ein einfaches"use * /del"

in einem kleinen Batchfile was beim anmelden ausgeführt wird.

[Egli 10]

OH, wohl zu langsam geantwortet.

[Thorre 10]

Ja ja ihr habt ja alle recht.

Aber ich hätte gerne ein VB-Script. Zur Not geht aber auch die batch Methode.

 

Gruss

Thorre

[Damian 1.670]

Hi.

 

Dann schau mal hier rein: http://www.microsoft.com/germany/technet/datenbank/articles/600327.mspx

 

Jede Menge Scripte zum Download, ist vielleicht was passendes dabei. Dort gibts auch das Tool Scriptomatic, um selber Scripte zu basteln. :wink2:

 

Damian

[jobe 10]

also ich nutze diesen hier

 

WshNetwork.RemoveNetworkDrive "H:"

geht bestimmt auch mit *

 

jobe

[Thorre 10]

So habe hier nun eine Lösung die auch funktioniert

 

'--------------------------------------------------------------------

' Netzlaufwerke f: bis z: trennen Asc(f)=102 ...Asc(z)=122

' ACHTUNG: auf Kleinschreibung bei Netzlaufwerken achten

'--------------------------------------------------------------------

 

Dim DelNetDrive

 

Set WshNet = CreateObject("WScript.Network")

 

For DriveAsc = 102 To 122

On Error Resume Next

DelNetDrive = Chr(DriveAsc) & ":"

WshNet.RemoveNetworkDrive DelNetDrive, True, True

Next

 

Gruss

Thorre