作成 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:\>
タグ: VBScript WMI

©2004-2017 UPKEN IPv4