Error during command authentication.
Error - unable to initiate communication with LISTSERV (errno=10061, phase=CONNECT, target=127.0.0.1:2306). The server is probably not started.
On Jul 29, 2009, at 7:05 PM, Nobumi Iyanaga wrote: > Hello John and Deivy, > > > On Jul 29, 2009, at 10:50 PM, Deivy Petrescu wrote: >> play with the script below, it should give you some ideas. >> By the way, in all the Macs I've tested here last message returns >> the last by the earliest date. >> I've no idea what is the problem with your Mail... > > Yes, this is really strange, but in my two machine, running OS 10.4 > and 10.5, I have the same result... >> >> >> set mb to 1 >> set acct to 1 >> set First_Msg to 250 >> set Last_Msg to 200 >> >> --script that in this case erase repeated messages in the range >> 200 to 250 from the mailbox mb of account acct >> >> with timeout of 3900 seconds >> tell application "Mail" >> --tell mailbox mb of account acct to set al to every message >> whose date received < (current date) >> --return al >> set alist to {} >> set anumber to count messages in mailbox 1 of account 1 >> tell mailbox 1 of account 1 to repeat with jj from 0 to 10 >> set end of alist to ({sender, subject, date received} of message >> (anumber - jj)) & ("Message number: " & (anumber - jj)) >> end repeat >> (* >> repeat with msg from First_Msg to Last_Msg by -1 >> if (message id of message msg) = (message id of message (msg - >> 1)) then delete (message msg ) >> end repeat >> *) >> end tell >> end timeout >> alist > > Thank you for this example. > > Combining your two scripts, I tested the following script: > > tell application "Mail" > set _selected to first item in (get selection) > set received to date received of _selected > set _mailbox to mailbox of _selected > set _range to messages in _mailbox whose date received ≥ received > > set _messageids to {} > repeat with _i in _range > set end of _messageids to message id of _i > set end of _messageids to {sender, subject, date received} of _i > end repeat > _messageids > end tell > > This works very well. Now, I have to try to delete one of the > messages of the same message id. As I cannot use the message number > as in Deivy's example, I think I will have to do something like this: > > tell application "Mail" > set _selected to first item in (get selection) > set received to date received of _selected > set _mailbox to mailbox of _selected > set _range to messages in _mailbox whose date received ≥ received > > --set _messageids to {} > set last_id to "mydummy" > repeat with _i in _range > --set end of _messageids to message id of _i > --set end of _messageids to {sender, subject, date received} of _i > set this_id to message id of _i > if this_id = last_id then > delete message last_id > end if > set last_id to message id of _i > > end repeat > -- _messageids > end tell > > For now, I cannot test this script. Do you think this would work...? > > Thank you very much in advance. > > Best regard, > > Nobumi Iyanaga > Tokyo, > Japan Nobumi Do everything in one pass: tell application "Mail" activate set _selected to first item in (get selection) set received to date received of _selected set _mailbox to mailbox of _selected set _range to messages in _mailbox whose date received ≥ received set _messageids to {} repeat with _i in _range set _i to contents of _i set _mid to message id of _i if _mid is not in _messageids then set end of _messageids to _mid else delete _i end if end repeat end tell Deivy Petrescu [log in to unmask]