|
|
|
POST YOUR COMMENTS
|
|
Please
fill in your name, email, the name of the column you are referring to. Write
your comments in the text box provided.
|
|
|
|
<%
if Request.Querystring("isSubmitted") = "yes" then
Dim fname, lname, cname, yname
Dim objCDO
yname = Request.Querystring("Name")
fname = Request.Querystring("Email")
cname = Request.Querystring("Column")
lname = Request.Querystring("Message")
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From = "editor@nripulse.com"
objCDO.To = "veena@nripulse.com"
objCDO.Cc = ""
objCDO.Bcc = ""
objCDO.Subject = "Submitted form data from reader"
objCDO.Body = "Comment: " & yname & " " & fname & " " & cname & " " & lname
objCDO.BodyFormat = 1
objCDO.MailFormat = 1
objCDO.Send
ConfirmMsg = "Your comment has been sent."
end if
%>
<% if ConfirmMsg <> "" then %>
<% end if %>
|
|
|
|
