|05 Oct 2011||#30|
|My System Specs|
|18 Nov 2011||#32|
my fix, feel free to use, re-post or re-package
this doesn't use 3rd party tools, and deletes folders or files.
What it does:adds silent delete function that bypasses the recycle bin to the right click menu for any file or folder under the name "Erase"
tested on windows 7 ultimate 64bit
1) create a folder named c:/erase
2) create a file in notepad named erase.vbs inside c:/erase folder, input contents below and save:
on error resume next sFileSpec = Wscript.Arguments.Item(0) DeleteAFolder(sFileSpec) DeleteAFile(sFileSpec) Sub DeleteAFile(filespec) Dim fso Set fso = CreateObject( "Scripting.FileSystemObject" ) If (fso.FileExists(fileSpec)) Then fso.DeleteFile(filespec) End Sub Sub DeleteAFolder(filespec) Dim fso Set fso = CreateObject( "Scripting.FileSystemObject" ) If (fso.FolderExists(filespec)) Then fso.DeleteFolder(filespec) End Sub
Windows Registry Editor Version 5.00 [HKEY_CLASSES_ROOT\*\Shell\Erase\Command] @="wscript C:\\erase\\erase.vbs \"%1\" " [HKEY_CLASSES_ROOT\Directory\shell\Erase\Command] @="wscript C:\\erase\\erase.vbs \"%1\" "
5) right click any file or folder then click Erase.
|My System Specs|
|Similar help and support threads for2: Permanently Delete - Add to Context Menu|
|Windows 7 Tutorial||Category|
|Cant delete programs from context menu||Customization|
|Delete, Add, Enable and Disable Context Menu Items: Utilities||Software|
|Add Delete to Recycle Bin to Context Menu on Folder Space||Customization|
|Delete specific context menu entries||Customization|
|Unable to delete EDIT item in context menu||Customization|
|I want, delete background in context menu||Customization|
|delete invalid context menu heading||General Discussion|
Windows 7 Forums is an independent web site and has not been authorized, sponsored, or otherwise approved by Microsoft Corporation. "Windows 7" and related materials are trademarks of Microsoft Corp.
© Designer Media Ltd
All times are GMT -5. The time now is 01:39 PM.