gunsmokingman Posted October 17, 2006 Share Posted October 17, 2006 (edited) Here is a script that will delete files it can do multiple files at the same time. How to use 1:\ Drag any file or files on to the VBS script Note this does not send the file or files to the recyle bin but deletes the files permently.Save As Drag_Drop_Delete.vbsDim Fso : Set Fso = CreateObject("Scripting.FileSystemObject") Dim DelFile For Each DelFile in Wscript.Arguments : Fso.DeleteFile(DelFile) : NextLink To Updated DragDropDelete Edited January 27, 2007 by gunsmokingman Link to comment Share on other sites More sharing options...
Stealth111 Posted October 17, 2006 Share Posted October 17, 2006 Thanks for the handy little script!! Link to comment Share on other sites More sharing options...
gunsmokingman Posted October 17, 2006 Author Share Posted October 17, 2006 Your welcome Link to comment Share on other sites More sharing options...
gunsmokingman Posted January 27, 2007 Author Share Posted January 27, 2007 (edited) I have updated the script so it now does Files and Folders.This does not send any thing to the Recyle Bin it deletes.Dim Fso : Set Fso = CreateObject("Scripting.FileSystemObject") Dim DelF, GetF On Error Resume Next For Each DelF in Wscript.Arguments Set GetF = Fso.GetFile(DelF) : GetF.Delete() Next For Each DelF in Wscript.Arguments Set GetF = Fso.GetFolder(DelF) : GetF.Delete() NextHere is a Rar file of the above code Edited November 7, 2007 by gunsmokingman Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now