macro to delete all msgs

[prabhakar]

I need a macro to exec the following commands :
" tag all the messages in the current mailbox, and then delete the tagged messages". 

Can anyone tell me how to do this ...

thanks
prabhakar