VBScript - Delete A Folder

This script allows you to delete a folder.

VBScript

2367
1513
0
0

Add to collection

1 Open your favorite text editor. In our case we are going to use Notepad++

2 Copy the VBScript code from below.

3 Paste the code in the newly created file.

4 Save the file with a ".vbs" extension.

The DeleteFolder method does not distinguish between folders that have contents and those that do not. The specified folder is deleted regardless of whether or not it has contents.

5 Run the script file by double-clicking on it or via the CMD console.

6 That's it!

Code

' This script deletes a folder.
Sub deleteFolder()
    ' Set variables
    Dim fso
    Dim folderName
    Dim folderPath
    Dim folderToBeDeleted
    Dim msg
    ' Set folder path
    folderPath = "F:\VBAmacros\VBScript\"
    ' Set folder name
    folderName = "My Folder"
    ' Ser folder to be deleted
    folderToBeDeleted = folderPath & folderName
    ' Create a file system object
    Set fso = Wscript.CreateObject("Scripting.FileSystemObject")
    ' Check if the folder already exists
    If Not fso.FolderExists(folderToBeDeleted) Then
        ' Set a message
        msg = "Warning! " & folderName & " not found!"
        ' Output a message
        MsgBox msg
    Else
        ' Delete folder
        fso.DeleteFolder(folderToBeDeleted)
        ' Check if folder still exists
        If Not fso.FolderExists(folderToBeDeleted) Then
            ' Set a message
            msg = "Success! " & folderName & " was successfully deleted!"
            ' Output a message
            MsgBox msg
        Else
            ' Set a message
            msg = "Error! " & folderName & " was not deleted!"
            ' Output a message
            MsgBox msg
        End If
    End If
    ' Release the file system object
    Set fso = Nothing
End Sub
' Run the procedure
Call deleteFolder()