要删除文件夹及其内的所有文件，您可以使用以下VBScript代码：
Dim objFSO
Set objFSO = CreateObject("Scripting.FileSystemObject")
'要删除的文件夹路径
Dim folderPath
folderPath = "C:\path\to\folder"
If objFSO.FolderExists(folderPath) Then
objFSO.DeleteFolder folderPath, True
MsgBox "文件夹已成功删除"
Else
MsgBox "文件夹不存在"
End If
请替换folderPath变量的值为您要删除的文件夹的路径。在上面的代码中，True参数指定删除文件夹及其所有子文件和子文件夹。如果您只想删除空文件夹，可以将该参数设置为False。
请注意，删除操作是不可逆的，请确保在删除文件夹之前备份重要文件。
