Solved

CDONTS.NewMail Send HTML without the <META> tag

Posted on 2002-06-30
9
360 Views
Last Modified: 2012-05-04
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
Comment
Question by:gali040898
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
9 Comments
 
LVL 44

Expert Comment

by:bruintje
ID: 7120453
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
 

Author Comment

by:gali040898
ID: 7120628
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
 
LVL 44

Expert Comment

by:bruintje
ID: 7120636
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
Independent Software Vendors: 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!

 

Author Comment

by:gali040898
ID: 7120642
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
 

Author Comment

by:gali040898
ID: 7120657
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
 
LVL 44

Expert Comment

by:bruintje
ID: 7120687
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
 

Author Comment

by:gali040898
ID: 7124037
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
 
LVL 49

Expert Comment

by:DanRollins
ID: 7970916
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
 

Accepted Solution

by:
SpideyMod earned 0 total points
ID: 8018463
per recommendation

SpideyMod
Community Support Moderator @Experts Exchange
0

Featured Post

Independent Software Vendors: 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!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

749 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question