mfl Posted August 9, 2010 Posted August 9, 2010 We currently have an issue with sending email from FM. We are/have moved to Zimbra, the full server version 6. Previously when we sent mail from FM it would default to Mac mail. I have set my Zimbra to default mail client but when I try the send mail option from FM nothing happens. For people who have not yet done so it defaults to the Mac mail. The following is the send mail script Set Error Capture [ On ] Set Variable [ $Subject; Value:MondettaMail::MMB_Subject ] If [ Get (ScriptParameter) = "View Mail" ] Set Variable [ $filepath; Value:Case ( Middle( Get (DesktopPath);2;1) = "U" ; "filemac:/" ; Middle( Get (DesktopPath);2;1) = "M" ; "filemac:/" ; Middle( Get (DesktopPath);2;1) = "M" ; "filemac:/" ; Middle( Get (DesktopPath);2;1) = "C" ; "filewin://DEEPTHOUGHT/" ) & "MondettaEnterprise/Groups/ERP/Documents/Programs/" & MondettaMail::MMB_ID_Program_Number & "/" & MondettaMail::MMB_ID_Program_Number & "_Mail_Attachments/" & Middle ( GetValue ( MondettaMail_Attachments::MMA_Attachment_Path ; 1 ) ; 6 ; 999 ) ] Show Custom Dialog [ Title: "SEND"; Message: "Send Message, or Send Thread?"; Buttons: “Message”, “Thread”, “Cancel” ] If [ Get (LastMessageChoice) = 1 ] Set Variable [ $Message; Value:MondettaMail::MMB_Message ] Send Mail [ Send via E-mail Client; Subject: $Subject; Message: $Message & "¶¶"; Attachment: “$filepath” ] End If If [ Get (LastMessageChoice) = 2 ] Set Variable [ $Message; Value:MondettaMail::MMB_List_Thread_Content ] Send Mail [ Send via E-mail Client; Subject: $Subject; Message: $Message & "¶¶"; Attachment: “$filepath” ] End If End If If [ Get (ScriptParameter) = "Draft" ] Show Custom Dialog [ Title: "SEND"; Message: "Send Message, or Send Thread with Message?"; Buttons: “Message”, “Thread”, “Cancel” ] If [ Get (LastMessageChoice) = 1 ] Set Variable [ $Message; Value:MondettaMail::MMB_Message ] Send Mail [ Send via E-mail Client; Subject: $Subject; Message: $Message ] End If If [ Get (LastMessageChoice) = 2 ] Set Variable [ $Message; Value:MondettaMail::MMB_List_Thread_Content & "¶¶ ___________________________________________________________________¶" & MondettaMail::MMB_Message ] Send Mail [ Send via E-mail Client; Subject: $Subject; Message: $Message ] Perform Script [ “070 Send Draft Message Converting it to Open” ] End If End If If [ Get (ScriptParameter) = "New Mail" ] Show Custom Dialog [ Title: "SEND"; Message: "Send Message, or Send Thread with Message?"; Buttons: “Message”, “Thread”, “Cancel” ] If [ Get (LastMessageChoice) = 1 ] Set Variable [ $Message; Value:MondettaMail::MMB_Message ] Send Mail [ Send via E-mail Client; Subject: $Subject; Message: $Message ] End If If [ Get (LastMessageChoice) = 2 ] Set Variable [ $Message; Value:MondettaMail::MMB_List_Thread_Content & "¶¶ ___________________________________________________________________¶" & MondettaMail::MMB_Message ] Send Mail [ Send via E-mail Client; Subject: $Subject; Message: $Message ] End If End If Regards Michael
Recommended Posts
This topic is 5212 days old. Please don't post here. Open a new topic instead.
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now