Hiro,
All my PowerMail messages are in a PowerMail folder. Here's a script to
see the stats of your database.
This was a modified version of someone else's script.
Andy
<applescript>
property preMsg : "You currently have: " & return
property postcC : " Message folders"
property postfC : " Message Filters"
property postclC : " Text Clippings"
property postsigC : " Signatures"
property postMsgs : " Messages"
property bttnList : {"Thanks", "Put on Clipboard"}
property defBttn : "Put on Clipboard"
to concatenateData(cCnt, fCnt, clCnt, sigCnt, ctMsg)
return (preMsg & ctMsg & postMsgs & return & cCnt & postcC & return &
fCnt & postfC & return & clCnt & postclC & return & sigCnt & postsigC)
end concatenateData
to displayTotals(statsTxt)
set the dialogBttn to the button returned of (display dialog statsTxt
buttons bttnList default button 2)
if the dialogBttn is the defBttn then
set the clipboard to the statsTxt
beep
end if
end displayTotals
tell application "PowerMail 5.1.1a1"
set the containerCnt to count message container
repeat with i from 1 to containerCnt
set subContainerCnt to count message containers of message
container i
set containerCnt to containerCnt + subContainerCnt
end repeat
set the filterCnt to count filters
set the clipCnt to count text clippings
set the sigCnt to count text signatures
set ctMsg to 0
repeat with acontainer in every message container
set ctMsg to ctMsg + (my count_messages(acontainer))
end repeat
set the statsTxt to my concatenateData(containerCnt, filterCnt, clipCnt,
sigCnt, ctMsg)
my displayTotals(the statsTxt)
end tell
-- The above will count your PowerMail; message folders, filters, text
clippings
-- and the text signatures and display the information in a dialog.
-- The dialog will give you an option to put the entire results
-- onto the clipboard.
(* this recursive function receives a message container (folder). It first
calls itself for every sub-container of the input container, summing up
the number of messages stored in them, and last, adds the number of
messages in the input container itself.
*)
to count_messages(input_container)
tell application "PowerMail 5.1.1a1"
set c to 0
repeat with bcontainer in every message container in
input_container
set c to c + (my count_messages(bcontainer))
end repeat
set c to c + (number of messages in input_container)
return c
end tell
end count_messages
</applescript>
--
Andy Fragen
On Mon, Mar 7, 2005, A-NO-NE Music said:
>Barbara Needham / 05.3.7 / 03:04 PM wrote:
>
>>Is this a contest? 8925 messages to 10/06/02 and I'm sure I should delete
>>some of them.
>>
>>>I've got 7,000 messages dating back to Feb 2003.
>>>
>>>>I've got 3800 messages in my PowerMail folder dating back to 11/2003.
>
>
>Sorry for a dumb question.
>How are you seeing the info? I only see the number of messages per
>folder. Now I am so curious how many messages I have. Message database
>is about 1GB.
>
>
>--
>
>- Hiro
>
>[PROTECTED]
><[PROTECTED]> <[PROTECTED]>
>
>
>
>
