Mailing Lists: Apple Mailing Lists

Image of Mac OS face in stamp
 
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Searching a Mail message



On 2007-06-02, at 14:18:19, deivy petrescu wrote:

Some people tend to undermine AS abilities.
May be my problem is I tend to overestimate its capabilities and can not go past it.

Here's your script adapted to work with Mail. When I run it on your post I'm replying to, it doesn't produce an acceptable result.

on tid(theDelimiter)
set AppleScript's text item delimiters to theDelimiter
end tid

tid("@")
set emails to {}
tell application "Mail" to set m to content of item 1 of (get selection)
set q to text items of m
tid(space)

repeat with j from 1 to ((count q) - 1)
if (text item -1 of text item j of q) ≠ "" and (text item 1 of text item (j + 1) of q) ≠ "" then set end of emails to (text item -1 of text item j of q) & "@" & (text item 1 of text item (j + 1) of q)
end repeat
emails

Result:

{"\"@\"", "it.

Here

<script>
tid(\"@\")
set", "\"email@hidden", "email@hidden", "email@hidden", "\"@\"", "tid
</script>

---{\"email@hidden\",", "\"email@hidden\",", "\"email@hidden\"}

Help/Unsubscribe/Update", "email@hidden
"}


Philip Aker
email@hidden


 _______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list      (email@hidden)
Help/Unsubscribe/Update your Subscription:
http://lists.apple.com/mailman/options/applescript-users/email@hidden
Archives: http://lists.apple.com/archives/applescript-users

This email sent to email@hidden

References: 
 >Re: Searching a Mail message (From: Jeffers <email@hidden>)
 >Re: Searching a Mail message (From: Luther Fuller <email@hidden>)
 >Re: Searching a Mail message (From: Michelle Steiner <email@hidden>)
 >Re: Searching a Mail message (From: Luther Fuller <email@hidden>)
 >Re: Searching a Mail message (From: Michelle Steiner <email@hidden>)
 >Re: Searching a Mail message (From: Luther Fuller <email@hidden>)
 >Re: Searching a Mail message (From: deivy petrescu <email@hidden>)



Visit the Apple Store online or at retail locations.
1-800-MY-APPLE

Contact Apple | Terms of Use | Privacy Policy

Copyright © 2007 Apple Inc. All rights reserved.