Zum Inhalt springen
View in the app

A better way to browse. Learn more.

Fachinformatiker.de

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Durch VBS Laufwerksbuchstaben an shell übergeben

Empfohlene Antworten

Veröffentlicht

Hallo ihr!!

Ich habe dank eines ganz netten Menschen ausm Forum ein Script, dass mir mein CDROM-Laifwerk sagt, und auch die Dateien, die sich auf der CD befinden:

-------------------------------------------------------------------

Const DriveTypeCDROM = 4

dim oFS, oDrives, f, fc, f1, s, pfad

Set oFS = Wscript.CreateObject("Scripting.FileSystemObject")

Set oDrives = oFS.Drives 'Loop thru A-Z. If found, exit early.

For Each Drive in oDrives

If Drive.DriveType = DriveTypeCDROM Then

Wscript.Echo "Ihr CD-ROM-Laufwerk ist: " + Drive.DriveLetter +":\"

pfad = Drive.DriveLetter + ":\"

Set f = oFS.GetFolder(pfad)

Set fc = f.Files

For Each f1 in fc

WScript.echo f1.name

Next

End If

Next

------------------------------------------------------------

Jetzt soll die Shell direkt auf mein CD-ROM Laufwerk gehen, und nicht auf das Standardverzeichnis. Also da soll dann unten stehen CDROM:/(bei mir D:/) und nicht was aneders. Wie kann ich das machen? Weiß das vielleicht jemand?

LG und Danke schon mal Tine!!

Set objShell = Wscript.CreateObject("Wscript.Shell")

objShell.CurrentDirectory = "D:\"

sollte helfen.

s'Amstel

ich will aber nicht "D:\" rein schreiben, sondern er soll es automatisch rausfinden und dann einfügen. Aber danke trotzdem, vielleicht weißt du dafür ja auch noch ne antwort!?

LG Tine

vielleicht check ich es nicht ganz, aber du hast in Drive.DriveLetter ja eh schon den laufwerksbuchstaben vom cd-rom stehen.

das mit CurrentDirectory angewandt sollte doch auf das richtige laufwerk wechseln.

s'Amstel

Hi Tinchen, na wie gehts voran? ;)

Set objShell = Wscript.CreateObject("Wscript.Shell")

objShell.CurrentDirectory = "D:\"

Bezogen auf dein Script meint er das so:

Set objShell = Wscript.CreateObject("Wscript.Shell")

objShell.CurrentDirectory = pfad

Dann bist du direkt auf dem CD-ROM-Laufwerk (bzw. wenn es mehrere davon gibt, im höchsten Laufwerksbuchstaben).

Gruß

Mario

Jetzt habe ichs kapiert... BlueSky meint, daß innerhalb des Skripts ein Systemaufruf ausgeführt werden soll, der D:\ zum aktuellen Shell-Verzeichnis macht. Ist das Skript zu Ende, soll D:\ in der Konsole stehen. Aber wie es geht, weiß ich auch nicht. Es dauert ja ewig, bis man unter google irgendwas hilfreiches zu vbs gefunden hat...

Archiv

Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.