Είναι πολύ απλό.
Αντίγραψε τα παρακάτω και τοποθέτησε τα σε ένα txt αρχείο, αμέσως μετά σώσε το αρχείο σε .asp ΠΧ.
mailform.asp
Ανέβασε το mailform.asp σε ένα φάκελο του web site σου
Στις φόρμες θα δώσεις
<form action="http://yourdomain.com/fakelos/mailform.asp" method="post">
==============
<%
response.buffer=true
mbody="Από τη
φόρμα του site" & vbcrlf
for each tt in request.form
mbody=mbody & vbcrlf & tt & ": " & request.form(tt)
next
set
mailer=server.createobject("SMTPsvg.Mailer")
Mailer.CustomCharSet="windows-1253"
mailer.fromname="Mailer"
mailer.fromaddress="root@yourdomain.com"
'πραγματικό email
mailer.remotehost="mail.yourdomain.com"
' ή όποιος είναι o mail server
mailer.subject="Θέμα" ' τίτλος του μηνύματος
mailer.addrecipient "Όνομα","admin@yourdomain.com"
'ονομα και email παραλήπτη
mailer.bodytext=mbody
if mailer.sendmail then
response.redirect
"http://yourdomain.com/thanks.html" ' Επιτυχής αποστολή -> redirect στη σελίδα thanks
else
response.redirect "http://yourdomain.com/opps.html" ' Ανεπιτυχής αποστολή -> redirect στη σελίδα opps
end if
%>