I am having an issue with sending an email in the runtime version of my program. If I send it through the full version of the application it works properly, if I send it through the runtime version of the application the email is showing the raw HTML code, not the processed and formatted body.
The code is sending the email to Outlook to allow it to be modified and edited a little better. I do not know if this is the problem with the runtime or something else. I know it works properly on my system but not on the runtimes.
Anyone have any idea what could be causing this or what to look at? All of my code is automatically generated by Active Script so there may be something within there that is causing it to process it wrong. I have included the generated code for the button and the code for the email template below.
Any help is appreciated!!
Casy
Code for email button:
Code for Email Template:
The code is sending the email to Outlook to allow it to be modified and edited a little better. I do not know if this is the problem with the runtime or something else. I know it works properly on my system but not on the runtimes.
Anyone have any idea what could be causing this or what to look at? All of my code is automatically generated by Active Script so there may be something within there that is causing it to process it wrong. I have included the generated code for the button and the code for the email template below.
Any help is appreciated!!
Casy
Code for email button:
Code:
'Send an e- mail message using the default external e-mail clilent. if is_object(topparent.this) then form_name = topparent.name()+".this" else form_name = "" end if Dim message_type as c message_type = "" param_to = "" param_subject = "" param_cc = "" param_bcc = "" template_text = a5_get_saved_email("BSRO_EmailTemplate") dim em as p 'A5_email_parser() parses out the different sections of the e-mail template em = a5_email_parser(template_text) 'Evaluate any mailmerge commands that may exist in the template by calling the a5_mailmerge() function. param_message = em.message_body_temp param_message = a5_mailmerge(param_message,form_name) param_message = a5_mailmerge(param_message,form_name) attachment_list = "" param_attachments = alltrim(attachment_list) 'Send the e-mail using the external e-mail client email_client_external(param_to,param_subject,param_message,param_attachments,param_cc,param_bcc)
Code for Email Template:
Code:
<send_to=""> <subject=""> <cc=""> <bcc=""> <attachments=""> <message_body=<<%str% <link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/> <link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><link rel="stylesheet" type="text/css" media="screen" href="a5res:defaultStyle\(default)"/><html><head><meta name="generator" content="Alpha Five HTML Editor"><title></title><style><!--p { margin-top: 0; margin-bottom: 0 }--></style></head><body><font color=#000000><font size=2><p><font face=Arial size=3>Cliff,</font></p><p><font face=Arial size=3></font> </p><p><font face=Arial size=3>Below are the wrenches from today that I need PO Number for. </font></p><p><font face=Arial></font> </p><p><table width=800 height=586> <tbody> <tr> <th width="100"> <p align=left><font face=Arial>Store #</font> </p> </th> <th width="100"> <p align=left><font face=Arial>Quantity</font></p></th> <th width="100"> <p align=left><font face=Arial>Line Code</font> </p> </th> <th width="100"> <p align=left><font face=Arial>Serial #</font> </p> </th> <th width="100"> <p align=left><font face=Arial>Total</font></p></th> <th width="100"> <p align=left><font face=Arial>PO #</font> </p> </th> </tr><tr><td colspan="6" ></td></tr><!-- [.ONE_MANY:Cal_Header_Tmp] --> <tr> <td> <p><font face=Arial>[.IF Cal_Readings_tmp->Serial_Number <> "" .and. Cal_Readings_tmp->Toolofbatch = 1]<<BSRO_BillingNum(Cal_Header_Tmp->Customer_Name)|>>[.END_IF]</p></font></TD> <td> <p align=left><font face=Arial>[.IF Cal_Readings_tmp->Serial_Number <> "" .and.Cal_Readings_tmp->Toolofbatch = 1][.IFCal_Header_Tmp->Boxsent = .t.]<<Cal_Header_Tmp->Boxsentnum+Cal_Header_Tmp->Total_Tools||10|0>>[.ELSE]<<Cal_Header_Tmp->Total_Tools||10|0>>[.END_IF][.END_IF]</p></font></TD> <td><font face=Arial>[.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"Condemned")]BSROCDOM[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"certified") .and. cal_readings_tmp->preset = .t.]BSROPRETW[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"adjusted") .and. cal_readings_tmp->preset = .t.]BSROPRETWREP[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"adjusted") .and. cal_readings_tmp->unit = "inlb"]BSROTPMS[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"certified") .and. cal_readings_tmp->unit = "inlb"]BSROMINTPMS[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"certified") .and. cal_readings_tmp->unit = "ftlb" .and. cal_readings_tmp->preset = .f.] BSROADJTW[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"adjusted") .and. cal_readings_tmp->unit = "ftlb" .and. cal_readings_tmp->calibration = 59 .and. cal_readings_tmp->preset = .f.]BSROADMINJTW[.END_IF][.IF cal_readings_tmp->Serial_Number <> "" .and. containsi(cal_readings_tmp->Result,"adjusted") .and. cal_readings_tmp->unit = "ftlb" .and. cal_readings_tmp->calibration = 78 .and. cal_readings_tmp->preset = .f.]BSROMAJADJTW[.END_IF] </font> </td> <td><font face=Arial>[.IF Cal_Readings_tmp->Serial_Number<> ""]<<Cal_Readings_Tmp->Serial_Number|>>[.END_IF]</font> </td> <td><font face=Arial>[.IF Cal_Readings_tmp->Serial_Number<> ""]<<Cal_Readings_Tmp->Labor+Cal_Readings_Tmp->Calibration+Cal_Readings_Tmp->Shipping+Cal_Readings_Tmp->Handling+Cal_Readings_Tmp->Rushcharge|$(|10|2>>[.END_IF]</font> </td><td><font face=Arial></font></td></TR> <tr> <td><font face=Arial></font></td> <td><font face=Arial></font> </td> <td vAlign=top background=""> <p><font face=Arial><<if( Cal_Readings_tmp->Toolofbatch = Cal_Header_tmp->Total_Tools .and. Cal_Header_tmp->Boxsent = .t.,"BSROBOX","")|>> </font></p></td> <td vAlign=top background=""> <p><font face=Arial><<if( Cal_Readings_tmp->Toolofbatch = Cal_Header_tmp->Total_Tools .and. Cal_Header_tmp->Boxsent = .t.,"Box Shipped (" + cal_header_tmp->boxsentnum + ")","")|>> </font> </p> <p align=right><strong><font face=Arial ><<if(Cal_Readings_tmp->Toolofbatch = Cal_Header_tmp->Total_Tools,"Total: ","")|>></font></strong></p></td> <td vAlign=top background=""> <p><font face=Arial>[.IF Cal_Readings_tmp->Toolofbatch = Cal_Header_tmp->Total_Tools .and. Cal_Header_tmp->Boxsent = .t.] <<Cal_Header_tmp->Boxsentnum * 14|$(|10|2>>[.END_IF] </font></p> <p><font face=Arial><strong>[.IFCal_Readings_tmp->Toolofbatch = Cal_Header_tmp->Total_Tools]<<Cal_Header_tmp->Final_Price|$(|10|2>>[.END_IF]</strong></font></p></td> <td><font face=Arial></font> </td> </tr><tr><td colspan="6"></td><!-- [.END_ONE_MANY] --></tr></TBODY></TABLE><p> </p></FONT></FONT></body></html> %str%> <style="HTML">
Comment