Delete Folder with Progress Bar

[water]

In this topic I found the following code to copy files to a target directory and display the windows progress bar.

Local $FOF_SIMPLEPROGRESS = 0
$winShell = ObjCreate("shell.application")
$winShell.namespace($Out).CopyHere($In,$FOF_SIMPLEPROGRESS)

How can I delete a folder and all subfolders and display the same windows progress bar?

Thanks in advance for your advice.

[water]

Anyone?