By Request VBS Script To Delete All Files From A Specified Folder

 

VBS Script:

 

strDirectory = "C:\DirectoryFolderName"

 

Set FSO = CreateObject("Scripting.FileSystemObject")

Set objFolder = fso.GetFolder(strDirectory)

 

For Each objFile in objFolder.Files

objFile.Delete True

 

Next

MsgBox "Done"

 

 

Published Thursday, February 05, 2009 12:54 PM by dhite
Filed under:

Comments

No Comments