VB6フォルダを削除する

スポンサーリンク

VB6 では、RmDir 関数か、FileSystemObject (FSO) の DeleteFolder メソッドを使用します。RmDir 関数だと、ディレクトリ内が空でないと削除されません。なるべく、FileSystemObject の DeleteFolder メソッドを使用するようにしてください。

FileSystemObject を使用する場合は、[プロジェクト] メニューの [参照設定] を選択して「Microsoft Scripting Runtime」にチェックを付けてください。

サンプルコード

以下にサンプルコードを示します。

VB6.0 以前
    ' FileSystemObject (FSO) の新しいインスタンスを生成する
    Dim cFso As FileSystemObject
    Set cFso = New FileSystemObject

    ' フォルダを削除する
    Call cFso.DeleteFolder("C:\Hoge")

    ' 読み取り専用の場合でも削除する
    Call cFso.DeleteFolder("C:\Hoge", True)

    ' 不要になった時点で参照を解放する (Terminate イベントを早めに起こす)
    Set cFso = Nothing

以下は、RmDir 関数を使用した例です。(お勧めしません)

VB6.0 以前
    ' ディレクトリ内が空の時だけ削除する
    Call RmDir("C:\Hoge")

関連するリファレンス

準備中です。

スポンサーリンク