Überprüfen ob ein Laufwerk verfügbar ist
Mit dem folgenden Visual Basic Script können Sie überprüfen ob ein bestimmtes Laufwerk existiert. Der zu prüfende Laufwerksbuchstabe wird hier in die Variable strDriveLetter geschrieben. Ja nachdem ob das Laufwerk existiert oder nicht, wird beim Ausführen des Skriptes eine Meldung angezeigt.
Option Explicit
' Declaration of variables
Dim strDriveLetter
Dim objFileSystem
' Set drive to be verified
strDriveLetter = "X:"
' Create object for filesystem access
Set objFileSystem = WScript.CreateObject("Scripting.FileSystemObject")
' Verify if specified drive is available
If (objFileSystem.DriveExists(strDriveLetter)) Then
WScript.Echo("Laufwerk existiert.")
Else
WScript.Echo("Laufwerk existiert nicht.")
End If
' Deallocate filesystem object
Set objFileSystem = Nothing
' Quit Visual Basic Script
WScript.Quit()
' Declaration of variables
Dim strDriveLetter
Dim objFileSystem
' Set drive to be verified
strDriveLetter = "X:"
' Create object for filesystem access
Set objFileSystem = WScript.CreateObject("Scripting.FileSystemObject")
' Verify if specified drive is available
If (objFileSystem.DriveExists(strDriveLetter)) Then
WScript.Echo("Laufwerk existiert.")
Else
WScript.Echo("Laufwerk existiert nicht.")
End If
' Deallocate filesystem object
Set objFileSystem = Nothing
' Quit Visual Basic Script
WScript.Quit()
Dieser Eintrag wurde am 09.09.2012 erstellt und zuletzt am 09.02.2013 bearbeitet.
Direkter Link zu dieser Seite: http://www.gtkdb.de/index_29_1848.html
[ Zur Startseite ] [ Zur Kategorie ]



© 2004-2019 by Georg Kainzbauer