Hi All,
Need CDO help
<%@ Language=VBScri pt %>
<%
Dim iMsg
Dim iConf
Dim Flds
Set iMsg = CreateObject("C DO.Message")
Set iConf = CreateObject("C DO.Configuratio n")
Set Flds = iConf.Fields
Flds("http://xyz.com") = True
Flds.Update
With iMsg
Set .Configuration = iConf
.CreateMHTMLBod y "http://xyz.com"
.HTMLBody="<h1> Jishnu</h1>
.To = "jishnu.guhatha kurta@clout.com "
.From = "CLOUT Reporting Unit <Reporting@clou t.com>"
.Subject = "Daily Snapshot Report"
.Send
End With
%>
The problem with this it does not CreateMHTMLBODY but if I take the
..HTMLBODY off then .CReateMHTMLBOD Y works.
I need to add some HTML body along with the url.
Does anyone know how to correct the code.
Thanks
Need CDO help
<%@ Language=VBScri pt %>
<%
Dim iMsg
Dim iConf
Dim Flds
Set iMsg = CreateObject("C DO.Message")
Set iConf = CreateObject("C DO.Configuratio n")
Set Flds = iConf.Fields
Flds("http://xyz.com") = True
Flds.Update
With iMsg
Set .Configuration = iConf
.CreateMHTMLBod y "http://xyz.com"
.HTMLBody="<h1> Jishnu</h1>
.To = "jishnu.guhatha kurta@clout.com "
.From = "CLOUT Reporting Unit <Reporting@clou t.com>"
.Subject = "Daily Snapshot Report"
.Send
End With
%>
The problem with this it does not CreateMHTMLBODY but if I take the
..HTMLBODY off then .CReateMHTMLBOD Y works.
I need to add some HTML body along with the url.
Does anyone know how to correct the code.
Thanks
Comment