ciao a tutti.ho fatto un codice che invia una mail a più destinatari,senza che questi vedano gli indirizzi degli altri.
il problema è che avevo bisogno che il codice interpretasse i tag di html inseriti in precedenza nel db,in modo che nella mail si possano scegliere colore del testo,font e usare i tag per il grassetto e i break.
una volta riuscito,la mia mail si è sballata e mi interpreta si i tag di html,ma non mi tiene più conto degli spazi che le avevo dato in ASP.
il codice è questo:
codice:
<%
sql2 = "select top 1 * from newsletter order by id desc"
rs.Open sql2, conn, 1, 3
data = rs("Data")
oggetto = rs("Oggetto")
testo = rs("Testo")
rs.close
sql = "select * from iscritti order by Nome"
rs.Open sql, conn, 1, 3
do while not rs.EOF
email = rs("Email")
sTo= email
sFrom = "info@centropopolareeuropeo.com"
sSubject = "Messaggio dal sito CentroPopolareEuropeo.com"
sMessage = vbcrlf _
& "Web Form from CentroPopolareEuropeo.com" & vbcrlf _
& vbcrlf _
& Message & vbcrlf _
& vbcrlf _
& "Data :" & data & vbcrlf _
& vbcrlf _
& " Oggetto : " & oggetto & vbcrlf _
& vbcrlf _
& " Testo : " & testo & vbcrlf _
'& vbcrlf _
Set objNewMail = CreateObject("CDONTS.NewMail")
objNewMail.BodyFormat = 0
objNewMail.MailFormat = 0
objNewMail.Importance = 1
objNewMail.Send sFrom, sTo, sSubject, sMessage
Set objNewMail = Nothing
rs.movenext
loop
Response.Redirect ("contatto.asp")
%>
e la mia mail,purtroppo,mi arriva così:
codice:
Web Form from CentroPopolareEuropeo.com Data :12/3/04 Oggetto : Ancora una prova... Testo : Prova
Ho quasi finito tutti i tentativi che avevo in testa...
invece io vorrei che Data, Oggetto e Testo andassero a capo,come succedeva prima di inserire il parametro per inviare la mail in html.
come posso fare per mandarli a capo?