Forum
send e-mail apo wedsite - Από {xristina}
exo to parakato script gia apostoli e-mail:
<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "pandora@teimes.gr"
JMail.Sender = "chtsantu@teimes.gr"
JMail.Subject = "Form post"
JMail.AddRecipient ( "chtsantu@teimes.gr" )
JMail.Body = Request.Form("Mailto")
JMail.Priority = 3
JMail.Execute
%>
Ευχαριστώ
<%
response.buffer=true
mbody="Automatic Form submission" & 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="pandora@teimes.gr"
mailer.subject="Θέμα"
mailer.addrecipient "Christina Tsantouli","chtsantu@teimes.gr" '
mailer.bodytext=mbody
if mailer.sendmail then
response.redirect "thanks.html" ' Επιτυχής αποστολή -> redirect
else
response.redirect "opps.html" ' Ανεπιτυχής αποστολή -> redirect
end if
%>
exo ftiajei tis selides "opps.html "kai "thanks.html"
o paraliptis exei e-mail :chtsantu@teimes.gr kai o mailServer einai:"pandora.teimes.gr"
1.exo simplirosei sosta ta pedia;
2.poio pragramma na egkatastiso;
3.bgazei sfalma stin grami:Set JMail = Server.CreateObject("JMail.SMTPMail")
Απάντηση από:Alex
O server είναι pandora.teimes.gr αλλά εσύ έχεις δώσει pandora@teimes.gr
Αντικατέστησε το [@] με[ .] τελεία.
πρέπει να εγκαταστήσεις το Jmail component ψάξε για Jmail στο google
Απάντηση από:xristina
ta pedia ta exo sosta;
1.mailer.fromaddress="root@yourdomain.com" 'πραγματικό email . poio e-mail tha valo;
2.response.redirect "thanks.html" ' Επιτυχής αποστολή -> redirect
else
ayto einai sosto;
to jero auto pandora.teimes.gr"
tip: Οι αρνητικές ιδέες δεν θα οδηγήσουν ποτέ σε θετικές πράξεις . * F5 για νέο tip