LiveCode Forums.

Code: Select all

...
put getMailText(tEMLArray) into tText
...

Code: Select all

on mouseUp 
   
   ## Let user select a EML file:
   answer file "EML"
   
   ## User clicked CANCEL so get out of this handler:
   if the result = "cancel" then
   	exit to top
   end if
   
   ## Put it into a variable:
   put url("file:" & it) into tData
   
   ## Let LC make the data an array:
   put emlToArray(tData) into tEMLArray
   
   ## I found that this does obviously not work with ALL emails, see my last postings...
   ## put tEMLArray["content"] into tText
   
   ## But this seems to work in most cases to get the actual BODY of the mail:
   put getMailText(tEMLArray) into tText
   
   ## Check tText in a field and see if you need to:
   ## put textdecode(tText,"utf8") into tTextClean
   
   ## Now you can continue with your last script from the previous page:
   ## headers is also an array and NOT a simple string, that is an error in the dictionary!
   put getHeaders(tData) into tHeaderArray
   put tHeaderArray["From"] into tFrom
   put tHeaderArray["To"] into tTo
   put tHeaderArray["Subject"] into tSubj
   put tHeaderArray["Date"] into tDate
   put tHeaderArray["Content-Transfer-Encoding"] into tContent
   put tTo & CR & tFrom & CR & tSubj & CR & tDate & CR & CR & tText
end mouseUp

Code: Select all

...
put emlToArray(tData) into tArray
put getAttachments(tArray) into tAt
...

Code: Select all

...
put emlToArray(tData) into tArray
put getAttachments(tArray) into tAt
...

Code: Select all

...
put the keys of tAt into tFilenames
repeat with i = 1 to the num of lines of tFilenames
   ## tFileName now contains the name of the first KEY of tAt
   put line i of tFilenames into tFileName

   ## Save the images on the desktop:
   put base64decode(tAt[tFileName]) into url("binfile:" & specialfolderpath("desktop") "/" & tFileName)
end repeat
...