Delete to Recycle

Bluepoint Design
	Practical cost effective solutions
	Macro Express Sample Macro: Delete to Recycle

I created this one to address the constant problem of deleting files on a network resource. In Windows 2000 and other places if you delete the file it simply disappears which could be disastrous if a macro runs afoul or a user makes a mistake. So this little gadget simply moves the file to a temporary folder on the local drive and deletes it from there thus moving it to the local user's recycle bin.

The sample file is a complete Macro express file. Simply open it with ME and run the demo macro.

Page last updated: 02/05/2008

Delete_to_Recycle.mex

Macro Script

Variable Save All Variables
Clear Text Variables: All
Clear Integer Variables: All
Read Registry String: "feedback"
Variable Set From File Path
Create Folder: "c:\MEDelete\"
Wait for Folder Exist: "c:\MEDelete\"
Move File or Files: "%T1%"
Wait for File Ready: "%T2%%T3%"
Delete File or Files: "%T2%%T3%"
Variable Restore All Variables

Macro Text

<VARSR:01><CLEARVAR1:T:ALL><CLEARVAR1:N:ALL><REGRSTR:1:HKEY_LOCAL_MACHINE\SOFTWARE\Insight Software Solutions\Macro Express\Miscellaneous\feedback><VFFILE:1:F:1:F:1:T:2:T:3:%T1%><DOFILE:02:NN:c:\MEDelete\>><WAITFOLDER:000000:000030:c:\MEDelete\><DOFILE:07:YN:%T1%>c:\MEDelete\><WFREADY:000010:000000:000000c:\MEDelete\%T2%%T3%><DOFILE:08:YN:c:\MEDelete\%T2%%T3%>><VARSR:05>

Here is a demonstration of how it works.

Demo

Macro Script

Pause: Complex
Variable Set String %T5% from File Name
Write Registry String: "feedback"
Macro Run: Delete to recycle bin

Macro Text

<PAUSE2:Center,CenterThis macro will demonstrate the Delete to Recycle Bin subroutine. Please select an expendable file on a network resource.T><TVAR2:05:09:Give me a file to delete><REGWSTR:5:HKEY_LOCAL_MACHINE\SOFTWARE\Insight Software Solutions\Macro Express\Miscellaneous\feedback><MACRUN2:Delete to recycle bin>

Practical cost effective solutions