Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 367
  • Last Modified:

CDONTS.NewMail Send HTML without the <META> tag

Hi,
I am using the CDONTS.NewMail object to send mail with html format.
My HTMl include the following tag:
<META content="text/html; charset=windows-1255" http-equiv=Content-Type>
The purpose tag is to set the correct encoding in outlook.
When i open the mail in outlook it's contain the html  but the numbers appears opposite instead of 1234 i am getting 4321.
when i view the source of the mail the <META> tag is disapper. The HTML mail is in hebrew language so the content of the mail is written from right to left.
Thanks.
0
gali040898
Asked:
gali040898
1 Solution
 
bruintjeCommented:
Hi gali,

How do you build the html string?

something like

HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" & vbCrLf
HTML = HTML & "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<meta http-equiv=""Content-Type"" content=""text/html; charset=iso-8859-1"">"
HTML = HTML & "<title>Sample NewMail</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body>"

etc..............?

so before you send the mail could you first print the html to see if the tag is in?

HAGD:O)Bruintje
0
 
gali040898Author Commented:
hi,
Yes it's like your e.g.
How Can i Print the html before sending?
Do u mean to print it with CDONTS.NewMail object ?
I can tell u when i saw the email throug Outlook Web Access the result was good.
Thanks.
0
 
bruintjeCommented:
sorry for the confusion i didn't mean print

i meant something like debug.print HTML to the debug window so you can check if the complete string is in there
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
gali040898Author Commented:
hi,
Thanks for your quick answer.
I am at home so i can try it, but i think this is not the problem, the string is with this tag when i send the new mail. did u try it? did  u get the same result as me?
Thanks.
0
 
gali040898Author Commented:
hi,
Thanks for your quick answer.
I am at home so i can try it, but i think this is not the problem, the string is with this tag when i send the new mail. did u try it? did  u get the same result as me?
Thanks.
0
 
bruintjeCommented:
you can reload with the link in the upper right of the question

got no way of testing it here, made a simple vbs script but i got no server here to test on since PWS and CDONTS don't work

maybe i can find a way tomorrow
0
 
gali040898Author Commented:
Hi
bruintje,  Here is my script:

Set objMail = CreateObject("CDONTS.NewMail")

sktovet = "http://Test.com"

HTML = HTML & "<HTML><HEAD>"
HTML = HTML & "<META http-equiv=""Content-Type"" content=""text/html; charset=ISO_8859-8-I"">"
HTML = HTML & "<TITLE>àúø îùàáé àðåù</title></HEAD>"
'HTML = HTML & "<META http-equiv=""Content-Type"" content=""text/html; charset=ISO_8859-8-I""></HEAD>"
HTML = HTML & "<BODY bgColor=#add8e6>"
HTML = HTML & "<div align=""right"" dir=""rtl""><P><STRONG><FONT color=blue face="""" size=5>àúø îùàáé àðåù<FONT></STRONG></P>"
HTML = HTML & "<TABLE border=0 cellPadding=1 cellSpacing=1 >"
HTML = HTML & "<TR>"
HTML = HTML & "<TD><DIV align=""right"" dir=""rtl"">" & "&nbsp;" & "" & "</DIV></TD>"
HTML = HTML & "<TD><DIV align=""right"" dir=""rtl""><FONT face="" Arial (Hebrew)"">" & "&nbsp;" & "ààà  , 54421, ááá" & "</DIV></TD>"
HTML = HTML & "</TR>"
HTML = HTML & "<TR>"
HTML = HTML & "<TD><DIV align=""right"" dir=""rtl"">" & "&nbsp;" & "" & "</DIV></TD>"
HTML = HTML & "<TD><DIV align=right dir=""rtl""><FONT face=""Arial (Hebrew)"">" & sEzer & "</DIV></TD>"
HTML = HTML & "<TD><DIV align=right dir=""ltr""><FONT face=""Arial (Hebrew)"">" & "<A HREF=" & sktovet & ">" & sktovet & "</A>" & "</DIV></TD>"
HTML = HTML & "</TR>"
HTML = HTML & "</TABLE>"
HTML = HTML & "</div></BODY></HTML>"    
   
   
   
   
    objMail.From = "XXXX@YYYY.com"
    objMail.Body = HTML
    objMail.BodyFormat = 0
    objMail.MailFormat = 0
    objMail.To = "XXXX@YYYY.com"
    objMail.Subject = "Subject"
    objMail.send
0
 
DanRollinsCommented:
Hi gali,
It appears that you have forgotten this question. I will ask Community Support to close it unless you finalize it within 7 days. I will ask a Community Support Moderator to:

    Refund points and save as a 0-pt PAQ.

gali, Please DO NOT accept this comment as an answer.
EXPERTS: Post a comment if you are certain that an expert deserves credit.  Explain why.
==========
DanRollins -- EE database cleanup volunteer
0
 
SpideyModCommented:
per recommendation

SpideyMod
Community Support Moderator @Experts Exchange
0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now