Name
RmDir Procedure
Class
Microsoft.VisualBasic.FileSystem
Syntax
RmDir(path)
-
path
(required; String) The path of the folder to be removed
Description
Removes a folder
Rules at a Glance
You may include a drive letter in
path
; if you don’t specify a drive letter, the folder is assumed to be on the current drive.path
can be a fully qualified, relative, or UNC pathname.If the folder contains files or other folders, RmDir will generate runtime error 75, “Path/File access error.”
Example
The following subroutine deletes all the files in a folder and removes its subfolders. If those contain files or folders, it deletes those too by recursively calling itself until all child folders and their files are removed.
Private Sub RemoveFolder(ByVal strFolder As String) Static blnLowerLevel As Boolean ' A recursive call - no ' need to prompt user Dim blnRepeated As Boolean ' Use Dir state info on ' repeated calls Dim strFile As String ' File/Directory contained in ' strFolder ' Delete all files Do strFile = Dir(strFolder & "\*.*", _ VbNormal Or VbHidden Or VbSystem) If strFile <> "" Then If Not blnLowerLevel Then If MsgBox("Delete files in directory " & _ strFolder & "?", vbQuestion Or vbOKCancel, _ "Confirm File Deletion") _ = vbCancel Then Exit Sub End If strFile = strFolder & "\" & strFile Kill(strFile) End If Loop While strFile <> "" ' Delete all directories Do If Not blnRepeated Then strFile = Dir(strFolder & "\*.*", VbDirectory) blnRepeated = True Else strFile = Dir( ) End If If strFile <> ...
Get VB.NET Language in a Nutshell, Second Edition now with the O’Reilly learning platform.
O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.