Slet folder med filer

Dim fso As New FileSystemObject
fso.DeleteFolder "c:\hest", True

ohh læste forkert, jeg trode du ville slette en folder rekusivt

Dim FileSys As FileSystemObject
Set FileSys = New FileSystemObject
FileSys.DeleteFile "C:\Temp\MyFile.txt"

Dette kunne være en del af løsningen, men hvorfor skriver den at den ikke kender FileSystemObject

fordi du ikke har tilføjet microsoft scripting runtime i projekt ref.

Project > references > Microsoft Scripting Runtime

Er folderne der skal slettes tomme, eller skal de først tømmes (alt indhold slettes) før de skal slettes?
Er der underfoldere?

ellers så gør sådan:

'---------------------- Form1 ----------------------
Option Explicit

Public Sub KillFolder(ByVal strDir As String)
Dim fso As Object
  Set fso = CreateObject("Scripting.FileSystemObject")
  Call fso.DeleteFolder(strDir, True)
  Set fso = Nothing
End Sub

Private Sub Form_Load()
  Call KillFolder("C:\Temp")
End Sub
'---------------------- Form1 ----------------------

Tak, skwat. Det virkede at slå Micro scripting ikke var slået til. Fik det til at virke to sek efter jeg så din besked 14.09 men kom desværre ikke tilbage til computeren efter det virkede. Men her har du pointene.

sjh takker for dit svar også, men det var jo som skrevet skwat der fik mig til at få gennembrudet