通过HTMLBody格式的ASP Classic CDOSYS电子邮件

jrp*_*982 5 cdo.message asp-classic

我在使用HTMLBody格式的ASP Classic中使用CDOSYS邮件系统发送电子邮件时遇到问题。它似乎有一个字符限制,并且在发送电子邮件时,它将在电子邮件底部附近切断该消息。起初,我以为是在写完所有电子邮件之前就已发送了该消息,但是在经过一些故障排除和研究之后,使用HTMLBody时存在某种CDOSys消息字符限制。我的问题是,是否有任何方法可以覆盖字符数限制或绕开限制?这仅适用于HTMLBODY。

编辑:“重复”标志不会帮助我。这不是截断问题,而是具有HTMLBody限制的问题,该问题阻止了冗长的消息在消息中被完全发送。我检查了那篇文章,这不是我在寻找答案。在此主题上的答复足以回答我的问题。谢谢你们。

这是我的代码:

         Set myMail=CreateObject("CDO.Message")


                        HTML = HTML & "<html>"
                        HTML = HTML & "<body>"
                        HTML = HTML & "<font face='calibri'>"

                        HTML = HTML & "<img src='http://" & SupportTagURLWebPath & "/images/SkypeEmailHeader.png'>"
                        HTML = HTML & "<br><Br>"

                        HTML = HTML & "<font face='calibri'>"                   
                        HTML = HTML & "<b>To " & Request.Form("SkypeTemplateName") & ":</b>"
                        HTML = HTML & "<br><br>"

                        HTML = HTML & "Thank you for contacting the Bank of America Service Desk. We're committed to providing seamless support in the moments that matter."
                        HTML = HTML & "<br><br>"                            
                        HTML = HTML & "We heard your concerns with Skype for Business audio/video, and recommend using approved Skype for Business devices to resolve the issue."
                        HTML = HTML & "<br><br>"
                        HTML = HTML & "<h4><font color='red'>What do I need to do?</font></h4>"

                        HTML = HTML & "<div style='background-color: #FFF8DC;'>"
                        HTML = HTML & "1. Visit the <a href='http://u.go/pchk'>Skype for Business Peripheral Checker</a> & complete the form.<br>"
                        HTML = HTML & "<img src='http://" &SupportTagURLWebPath & "/images/SkypeEmailbody.png'><br>"
                        HTML = HTML & "4. Once approved, your new device(s) will be shipped to you. To get started, visit the <a href='http://u.go/tIxvB5'>Skype for Business page</a> and select <i>Setup your equipment</i> tab."                     
                        HTML = HTML & "</div>"
                        HTML = HTML & "<br><br>"

                        HTML = HTML & "<br>"
                        HTML = HTML & "If you still encounter Skype for Business audio/visual issues with your new device(s), please <a href='http://u.go/7I76vm'>submit a web ticket</a> and one of our expert Bank of America Service Desk employees will reach out to you."
                        HTML = HTML & "Thank you,"
                        HTML = HTML & "<br>"
                        HTML = HTML & "Premium Service Desk"            


                        HTML = HTML & "<br><Br>"
                        HTML = HTML & "<img src='http://" & SupportTagURLWebPath & "/images/SkypeEmailFooter.png'>"     

                        HTML = HTML & "</font>"                 
                        HTML = HTML & "</body>"
                        HTML = HTML & "</html>" 



     myMail.Subject= "Skype for Business audio/visual experience"
     myMail.From=EMAILADDRESS
     myMail.To=Request.Form("SkypeTemplateEmail")
     'mymail.CC= Request.Form("displayemail")
     myMail.BCC="psd.wmwhc@bao.com"
     myMail.ReplyTo="Do Not Reply"
     'myMail.TextBody="This is a message."
     myMail.Configuration.Fields.Item _
     ("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
     'Name or IP of remote SMTP server
     myMail.Configuration.Fields.Item _
     ("http://schemas.microsoft.com/cdo/configuration/smtpserver")="amta3dns.bo.com"
     'Server port
     myMail.Configuration.Fields.Item _
     ("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 
    myMail.Configuration.Fields.Update


    'myMail.TextBody= Request.Form("genfeedback") 
    myMail.HTMLBody=HTML

    myMail.Send
     set myMail=nothing 
Run Code Online (Sandbox Code Playgroud)

jrp*_*982 2

我能够通过另一个线程进行谷歌搜索找出答案。如果您在电子邮件的每 3-5 行中放置以下行,则似乎会“重置”或将数量限制循环回到开头,而不更改电子邮件的格式。我不确定这是否是正确的处理方法,但它似乎适用于我今天创建的许多消息,这些消息具有相当长的消息,否则在发送消息时会被切断。我希望这可以帮助其他人解决这个问题。

HTML = HTML & vbCrLf
Run Code Online (Sandbox Code Playgroud)