Vbscript delete folder containing multiple progress bar files

was hoping this could be a way to visualize progress in deleting multiple files, I have an application that cleans up when it has been done, the directory that it deletes is almost 3 GB, so it would be nice to have a progress bar pop-up, similar to shown if you use

Const FOF_CREATEPROGRESSDLG = &H0&

strTargetFolder = "C:\OfficeTemp" 

Set oShell = CreateObject("Shell.Application")
Set objFolder = oShell.NameSpace(strTargetFolder) 

objFolder.CopyHere "OfficeTemp\*.*", FOF_CREATEPROGRESSDLG

presumably you can implement this using SHFileOperation, but I only see examples of using this in C ++, has anyone ever done this using VBScript?

C ++ Win32 API Delete progress bar file

+3
source share
2 answers

: , , yout script . GB, , , , , allready . , .

, , IE , script, . ActiveX, , , . , , . , , vbscript . , , , -

1000 .. 2000 .

, - . - , OS OS , script.

, , allproblemssolved.

+1

, , , Win7

Const FOF_CREATEPROGRESSDLG = &H0&

strTargetFolder = "D:\Scripts" 

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.NameSpace(strTargetFolder) 

objFolder.CopyHere "C:\Scripts\*.*", FOF_CREATEPROGRESSDLG
0

All Articles