(...I am sorry if this is a duplicate post. I inadvertantly posted from one
of my other email addresses and I'm not sure if that will get "sent" or not
since I am not registered with the list under that address.
Sorry!)
Hi all,
Thanks so much. I wasn't sure if I should post the script. This script runs
from the Filemaker file (called BKInquiries):
Set Error Capture (on)
Show All Records
Show Omitted Only
Freeze Window
Go to Layout ("Applescript")
Peform AppleScript (see below for details)
Go to Layout (original layout)
Go to Record/Request/Page (First)
Loop
Set Field (BKInquiries::InquiryDate; (Right(BKInquiries::InquiryDate;
Length(BKInquiries::InquiryDate) - (Position(BKInquiries::InquiryDate; "M "; 1;
1) +
1))
Set Field (BKInquiries::EmailReplySubject;
(Case(Left(BKInquiries::EmailReplySubject; 3) = "Re:";
BKInquiries::EmailReplySubject; "Re: " &
BKInquiries::EmailReplySubject)
Set Field (BKInquiries::InquiryEmail; (Trim(BKInquiries::InquiryEmail)
Go to Record/Request/Page (Next; Exit after last)
End Loop
Go to Record/Requst/Page (first)
This is the text of the Applescript:
tell application "Eudora"
set theMailbox to "In"
set numMessages to count every message of mailbox theMailbox
repeat with msgNum from 1 to numMessages
set msg1 to (a reference to message msgNum of mailbox theMailbox)
set address to field "From" of msg1
set aa to the offset of "<" in address
if (aa ≠ 0) then
set az to the offset of ">" in address
if (az ≠ 0) then set address to text (aa + 1) thru (az - 1) of
address
else
set aa to offset of ":" in address
set az to (offset of "(" in address) - 1
if az = 0 then set az to length of address
set address to text from (aa + 1) to az of address
end if
set iName to sender of msg1
set iSubject to subject of msg1
set iDate to message date of msg1
set iEmail to address
set iBody to field "" of msg1
tell application "FileMaker Pro"
create new record
set data of cell "InquiryName" of last record to iName
set data of cell "EmailReplySubject" of last record to
iSubject
set data of cell "InquiryDate" of last record to iDate
set data of cell "InquiryEmail" of last record to iEmail
set data of cell "InquiryComment" of last record to iBody
end tell
log numMessages - msgNum
end repeat
end tell
There are no error messages. However, no matter how many messages there are
in Eudora, only one new record shows up in BKInquiries (the Filemaker file),
and only the data from first field imports (InquiryName/iName).
I sure do appreciate any help!
Thanks very much!
Sally
> Hi Sally,
>
> this may be more of a Filemaker issue than an Eudora one, but if you want to
> post the script we could have a look at them. Are there any error messages?
> How are the scripts used (from within Filemaker or from within Eudora)?
>
>
>
**************
Need a new ride? Check out the largest site for U.S. used car listings at AOL
Autos.
(http://autos.aol.com/used?NCID=aolcmp00300000002851)
**************
Need a new
ride? Check out the largest site for U.S. used car listings at AOL Autos.
(http://autos.aol.com/used?NCID=aolcmp00300000002851)