Does anyone have a handy script for exporting delimited email messages from Clais Emailer 2.0? I have one that moves mail from Outlook 5.0 to a Hypercard stack, but I can't seem to modify it to work with Emailer. I might need to start from scratch, or maybe a just don't know how to swap out the Dictionary terminology to make it work. Here's my custom script to get Outlook mail to the HC stack: tell application "Outlook Express" set countExpInbox to "0" set countExpSentmail to "0" set countSizeExceeded to "0" set myMessages to every message in folder "Inbox" repeat with currentMsg in myMessages --set popAcct to name of account of currentMsg set popAcct to "pobox.com" as string set senderAddr to address of sender of currentMsg set msgSubject to subject of currentMsg set senderName to display name of sender of currentMsg set msgContent to content of currentMsg set timeSent to time sent of currentMsg tell application "HyperCard" -- activate set failedFlag to false try do script "go to stack Winterland:Files:MLG/Secretary" -- do script "set lockscreen to TRUE" do script "domenu new card" set background field id 6 to msgSubject set background field id 4 to timeSent as string do script "send closeField to background field ID 4" -- converts to abbr date and puts secs into hidden field set background field id 1 to "From: " & senderAddr & " <" & senderName & ">" & return & "Date: " & timeSent ¬ & return & "To: " & "mbossiere@" & popAcct & return & "Subject: " & msgSubject & return & return & msgContent set background field id 7 to "mbossiere@" & popAcct set background field id 9 to senderAddr do script "set the hilite of background button Email to TRUE" on error do script "domenu Delete card" set failedFlag to true end try -- do script "set lockscreen to FALSE" end tell if failedFlag is true then move currentMsg to folder "HC-Exceeded 30K (Inbox)" set countSizeExceeded to (countSizeExceeded + 1) else move currentMsg to folder "HC-Exported (Inbox)" set countExpInbox to (countExpInbox + 1) end if end repeat ---- set myMessages to every message in folder "Sent Items" repeat with currentMsg in myMessages set popAcct to "pobox.com" as string set recipAddr to address of recipient 1 of currentMsg set msgSubject to subject of currentMsg set senderName to display name of sender of currentMsg set msgContent to content of currentMsg set timeSent to time sent of currentMsg tell application "HyperCard" -- activate set failedFlag to false try do script "go to stack Winterland:Files:MLG/Secretary" -- do script "set lockscreen to TRUE" do script "domenu new card" set background field id 6 to msgSubject set background field id 4 to timeSent as string do script "send closeField to background field ID 4" -- converts to abbr date and puts secs into hidden field set background field id 1 to "From: " & "mbossiere@" & popAcct & return & "Date: " & timeSent ¬ & return & "To: " & address of recipAddr & return & "Subject: " & msgSubject & return & return & msgContent set background field id 7 to address of recipAddr set background field id 9 to "mbossiere@" & popAcct do script "set the hilite of background button Email to TRUE" on error do script "domenu Delete card" set failedFlag to true end try -- do script "set lockscreen to FALSE" end tell if failedFlag is true then move currentMsg to folder "HC-Exceeded 30K (Sent Mail)" set countSizeExceeded to (countSizeExceeded + 1) else move currentMsg to folder "HC-Exported (Sent Mail)" set countExpSentmail to (countExpSentmail + 1) end if end repeat activate -- display dialog countExpInbox & " incoming emails exported." & return & countExpSentmail & " sent emails exported." display dialog (countExpInbox + countExpSentmail) & " messages exported." as text end tell