Ho creato una mailing list ma il server dove è residente il sito usa, per spedire le mail solo l'oggetto MDUserCOM.MDUser
il codice che inserisco è il seguente:
<%
Set gMDUser = Server.CreateObject("MDUserCom.MDUser")
mbDllLoaded = gMDUser.LoadUserDll
if mbDllLoaded = False then
response.write "Could not load MDUSER.DLL! Program will exit." & "
"
else
Set gMDMessageInfo = Server.CreateObject("MDUserCom.MDMessageInfo")
gMDUser.ListUseHtmlDigests
gMDUser.InitMessageInfo gMDMessageInfo
gMDMessageInfo.To = "s.botta@deamedia.com"
gMDMessageInfo.From = "s.botta@deamedia.com"
gMDMessageInfo.Subject = "prova"
gMDMessageInfo.MessageBody = "prova testo"
gMDMessageInfo.MessageBody =""
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "<html>"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "<head>"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "<title>Conferma Iscrizione YourTime.it</title>"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "<meta http-equiv=""Content-Type"" content=""text/html; charset=iso-8859-1"">"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "</head>"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "<body bgcolor=""#FFFFFF"" text=""AF4302"" leftmargin=""3"" topmargin=""4"" marginwidth=""0"">"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "<table><tr><td>ciao</td><td>prova</td></tr></table>"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody &"</body>"
gMDMessageInfo.MessageBody = gMDMessageInfo.MessageBody & "</html>"
gMDMessageInfo.Priority = 0
'gMDMessageInfo.bodyFormat = 0
'gMDMessageInfo.mailFormat = 0
gMDUser.SpoolMessage gMDMessageInfo
mbDllLoaded = gMDUser.FreeUserDll
end if
if Err <> 0 Then
Err_Msg = Err_Msg & "[*]Your request was not sent due to the following error: " & Err.Description & ""
end if
%>
Funziona solo che vorrei che la mail fosse interpretata come html non come testo semplice, chi mi sa dire quale è il codice da inserire per far si che la mail venga spedita come html?
Grazie anticipatamente per chi mi risolve il problema.
Rispondi quotando
