Ciao ragazzi sto cercando di fare un form mail su un dominio lìhosting si chiama DOMINION sbaglio in qualcosa qualcuno ha questo provider o sa dirmi l'errore?Vi posto il codice che ho scritto:
Dim signori,persone,giorno,mese,pranzo,cena,note,mail, telefono
signori = Request.form("signori")
persone = Request.form("persone")
giorno = Request.form("giorno")
mese = Request.form("mese")
pranzo = Request.form("pranzo")
cena = Request.form("cena")
note = Request.form("note")
mail = Request.form("mail")
telefono = Request.form("telefono")
dim objCDO
set objCDO = CreateObject("CDO.Message")
dim contenuto
contenuto="signori: " & signori & "
"
contenuto = contenuto & "persone: " & persone & "
"
contenuto = contenuto & "giorno: " & giorno & "
"
contenuto = contenuto & "mese: " & mese & "
"
contenuto = contenuto & "pranzo: " & pranzo & "
"
contenuto = contenuto & "cena: " & cena & "
"
contenuto = contenuto & "note: " & note & "
"
contenuto = contenuto & "mail: " & mail & "
"
contenuto = contenuto & "telefono: " & telefono
DIM iMsg, Flds, iConf
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "mail.miosito.it"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update
objCDO.From = email
objCDO.To = "miamail.it"
objCDO.Subject = "Tavolo prenotato"
objCDO.HTMLBody = contenuto
objCDO.Send
Set objCDO = Nothing
%>
Rispondi quotando
