HDDの空き容量を取得するには

ビギナー 2003-07-11 15:15:49 No: 107757

HDDの空き容量を取得するにはどうすればいいのでしょうか。
ヘルプを見たところDriveオブジェクトを使えばよさそうなのですが

Dim D As Drive()

とすると,「型"Drive"が宣言されていません」のエラーが出るのですが
どうすれば宣言できるのでしょうか。

ビギナー 2003-07-11 15:34:32 No: 107758

すいません環境を書き忘れました

VB.NET
WinXP Home Edition

oku URL 2003-07-12 09:28:12 No: 107759

NETで出来るかわかりませんがVB6なら
GetDiskFreeSpaceと言うAPI取得できますよ。

岡田之仁 2003-07-13 00:38:36 No: 107760

ここに既に情報が掲載されていました。

ご参考までに・・・

以上。

美咲 URL 2003-07-15 21:38:38 No: 107761

Driveオブジェクトを使うならMicrosoft Scripting Runtimeを参照設定する必要がありますし、FileSystemObjectを生成する必要があります（といっても私の知識はVB6ですが)

Dim objFso As FileSystemObject
Dim objDrive As Drive

Set objDrive = objFso.GetDrive("C:\")

あとはobjDriveを使用するだけです

魔界の仮面弁士 2003-07-15 22:12:39 No: 107762

FileSystemObject だと、COM Interop を介さなくては
いけなかったりするので、VB6とは宣言が異なります。
（といっても、基本的な使い方は一緒なのですけれどね）

.NETで行うなら、岡田之仁さんの回答にあったURLにも
ありますように、WMIにてWin32_LogicalDisk.FreeSpace で
判定した方が良いかと思います。

# あるいは、GetDiskFreeSpace(Ex)を呼び出すという手もありますけれどね。

Crunky 2004-09-13 01:51:07 No: 107763

コマンドプロンプトからDIRコマンド実行して、出力を受け取って、
そん中から「個のディレクトリ」って文字列見っけたら、そん次にあるべ？
桁区切りが不要なら /-c つければ○。

こんなのヘボいかなぁ〜？