Comments / Query : " & clari & ""
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "localhost" ' Specify a valid SMTP server
Mail.From = "postmaster@nipmkerala.org" ' Specify sender's address
Mail.FromName = "postmaster@nipmkerala.org" ' Specify sender's name
Mail.IsHTML = true
Mail.AddAddress "feedback@nipmkerala.org"
Mail.AddReplyTo email
Mail.Subject = "Feedback from your site: www.nipmkerala.org"
Mail.Body = mailtext
On Error Resume Next
Mail.Send
If Err <> 0 Then
session("message")="Your feedback could not be sent because the mailserver is down. Please send your comments/queries after some time."
else
response.redirect "direct.htm"
End If
set mail = nothing
else
session("message")="Invalid email id! Your feedback could not be sent. Please specify a valid email id."
end if
end if
%>