ho questo form mail creato x CDO
<%
Dim MiaMail, strIp
Set MiaMail = CreateObject("CDO.Message")
strIp = Request.ServerVariables("REMOTE_ADDR")
MiaMail.From = request.form("databis")
MiaMail.From = request.form("tourbis")
MiaMail.From = request.form("nome")
MiaMail.From = request.form("cognome")
MiaMail.From = request.form("indirizzo")
MiaMail.From = request.form("citta")
MiaMail.From = request.form("Richieste")
MiaMail.From = request.form("tel")
MiaMail.From = request.form("fax")
MiaMail.From = request.form("Tipocliente")
MiaMail.From = request.form("Email")
MiaMail.To = "XXX@CXXX.IT"
MiaMail.Subject = "Richiesta di informazioni"
MiaMail.TextBody = vbCrlf &_
vbCrlf &_
("Questa e-mail è stata inviata il: ") & Now() & vbCrlf &_
("da: ") & ("Nome e Cognome: ") & request.form("nome") & " " &request.form("cognome") & vbCrlf &_
("Tipo cliente: ") & request.form("Tipocliente") & vbCrlf &_
("INTERESSATI AL TOUR: ") & request.form("tourbis") & vbCrlf &_
("DEL: ") & request.form("databis") & vbCrlf &_
("INDIRIZZO: ") & request.form("indirizzo") & vbCrlf &_
("CITTA: ") & request.form("citta") & vbCrlf &_
("TEL: ") & request.form("tel") & vbCrlf &_
("FAX: ") & request.form("fax") & vbCrlf &_
("EMAIL: ") & request.form("Email") & vbCrlf &_
("Richieste: ") & request.form("Richieste") & vbCrlf &_
("l'indirizzo IP è: ") & strIp & vbCrlf
'("data ed ora di invio: ") & ("Now()") & vbCrlf
MiaMail.Send()
Set MiaMail = Nothing
%>
X il campo tourbis ci sono all'interno dei campi formattati tipo
VIAGGIO
cosi viene rilevata nell'email di arrivo e non
VIAGGIO
come fare per eliminare il valore grassetto o riportare il valore grassetto sull'email ????
grazie saluti

Rispondi quotando
