<% if request.form <> "" then on error resume next if request.form("E-Mail")<> "" then Set objMail = Server.CreateObject("Persits.MailSender") objMail.Host = "mail.e2net.pvt" objMail.Port = 25 objMail.AddAddress "capitanbasilico@buiopesto.it" objMail.From=request.form("E-Mail") objMail.Subject="CapitanBasilico.it MAIL" objMail.Body="Nome: " & request.form("Mittente") & "

E-Mail: " & request.form("E-Mail") & "

" & request.form("Messaggio") & "

" objMail.IsHTML = True objMail.Send() Set objMail = nothing if err.number=0 then %>






Il messaggio è stato inviato correttamente.


Grazie
.




<% end if else myErr = true end if if err.number<>0 or myErr then %>




MESSAGGIO NON INVIATO CORRETTAMENTE
Errore:[<%= err.Description%>]




Se ci fossero problemi, scrivete alla nostra e-mail
capitanbasilico@buiopesto.it







<% end if else %>




Associazione Buio Pesto

Via Cavour 48, 16031 Bogliasco (GE)
Tel. 010/3471806 - Fax 010/3749447
capitanbasilico@buiopesto.it


Scrivi a Capitan Basilico
Mittente:
Indirizzo E-Mail:
Messaggio:  

Se utilizzando questo form si dovessero riscontrare problemi,
vi preghiamo di scriverci all'indirizzo capitanbasilico@buiopesto.it

<% end if %>