作成 2011.10.24
更新 2011.10.24
更新 2011.10.24
VBScript で特定のドライブを調べる
このサンプルでは Z ドライブがマウントされているか確認します。
コード
Option Explicit
Const TargetDrive = "Z:"
Dim wmiLocator
Dim wmiService
Dim driveInstance
Dim driveEnum
Set wmiLocator = CreateObject("WbemScripting.SWbemLocator")
Set wmiService = wmiLocator.ConnectServer
Set driveInstance = wmiService.ExecQuery _
("Select * From Win32_LogicalDisk Where DeviceID = '" & TargetDrive & "'")
For Each driveEnum In driveInstance
WScript.Echo driveEnum.DeviceID & vbTab & driveEnum.Description & vbTab & driveEnum.DriveType
Next
実行結果
C:\>cscript find_drive_letter.vbs Microsoft (R) Windows Script Host Version 5.8 Copyright (C) Microsoft Corporation 1996-2001. All rights reserved. C: ローカル固定ディスク 3 C:\>