Code: Select all
put specialFolderPath("documents") & "/testpdf.pdf" into tPDFPath
open printing to pdf tPDFPath
if the result is "Cancel" then
-- The user has cancelled printing
#exit printCards
else
--Print the card into the printable area
print card "PDFPrint1" of this stack into 0,0,575,800
print break
print card "PDFPrint2" of this stack into 0,0,575,800
end if
close printing
Code: Select all
global gvAttachment
command attachToEmail pAttachmentText, pAttachmentName
put specialFolderPath("documents") & "/testpdf.pdf" into gvAttachment["data"]
put "testpdf.pdf" into gvAttachment["name"]
put "pdf" into gvAttachment["type"]
end attachToEmail
On Mouseup
attachToEmail
--declare the variables that hold the information that is to be included in the e-mail
local tSubject, tTo, tCCs, tBCCs, tBody
--populate the e-mail variables
put empty into lvLaunchString
put "Appearance Release" into tSubject
put "Akauble@metaxpert.com" into tTo
put "Cspring@metaxpert.com" into tCCs
put "Rzimmerle@metaxpert.com" into tBCCs
put "This is your Appearance Release" into tBody
--send the e-mail
iphoneComposeHtmlMail tSubject, tTo, tCCs, tBCCs, tBody, gvAttachment
--End Email
End MouseUp
I would really appreciate help, I've spent quite a bit of time try to get this to work.
Thanks!