FileSystemObjectのDriveオブジェクトとDrivesコレクションの調査 †本資料はファイル、フォルダ、ドライブなどを扱うオブジェクトFileSystemObjectに含まれているDriveオブジェクトおよびDrivesコレクションについて調査した資料です。 関連資料 †Driveオブジェクト †Driveオブジェクトのサンプルコードを以下に記します。 Driveオブジェクトのサンプルコード †1: Set fso = CreateObject("Scripting.FileSystemObject") 2: Set drive_obj = fso.GetDrive("c:") 3: WScript.Echo "Total size : " & drive_obj.TotalSize 4: WScript.Echo "Free size : " & drive_obj.FreeSpace 5: WScript.Echo "DriveType : " & drive_obj.DriveType 2行目のGetDriveメソッドによりDriveオブジェクトを取得しています。 Driveオブジェクトのサンプルコード実行結果 †C:\wsh>cscript /nologo fso_drv_obj.vbs Total size : 85792387072 Free size : 72520994816 DriveType : 2 Drivesコレクション †Drivesコレクションのサンプルコードを以下に記します。 Drivesコレクションのサンプルコード †1: Set fso = CreateObject("Scripting.FileSystemObject") 2: Set drivers_collection = fso.Drives 3: For Each d in drivers_collection 4: WScript.Echo "TypeName(d) : " & TypeName(d) 5: WScript.Echo "DriveLetter : " & d.DriveLetter 6: WScript.Echo "DriveType : " & d.DriveType 7: WScript.Echo "--------" 8: Next 2行目のDrivesメソッドによりDrivesコレクションを取得しています。 Drivesコレクションのサンプルコード実行結果 †C:\wsh>cscript /nologo fso_drvs_collection.vbs TypeName(d) : Drive DriveLetter : C DriveType : 2 -------- TypeName(d) : Drive DriveLetter : D DriveType : 4 -------- TypeName(d) : Drive DriveLetter : Z DriveType : 3 -------- 上記出力結果を見るとTypeNameにより変数の種類を確認するとDriveオブジェクトなのが確認できます。 |