Dim FSO Set FSO = CreateObject("Scripting.FileSystemObject") x = ("c:\testfile*.ZIP") FSO.deleteFile(x) set FSO = nothing