World Phone India Pvt. Ltd.
C-153, Okhla Industrial Area,Phase-I
New Delhi - 110020, India Tel +91-11-26372645 Fax
+91-11-26372646
Feedback
<%
'If the form has been submitted execute the following code
Else
'receive the form values
Set rs=Server.CreateObject("ADODB.RECORDSET")
aname=trim(Request.Form("name"))
email=trim(Request.Form("email"))
subject=trim(Request.Form("subject"))
message=trim(Request.Form("message"))
'response.Write(aname)
'response.Write(email)
'response.Write(subject)
'response.Write(message)
Set cdomail=Server.CreateObject("CDONTS.NewMail")
cdomail.To="feedback@astroyogi.com"
cdomail.From=email
cdomail.Subject=subject
cdomail.Body=message
cdomail.Send
Set cdomail=Nothing
'Response.write "
Thank you for sharing your suggestions with us. We believe it is vital that our patrons advise us in our quest to provide a perfect experience on our site.
"
Response.Write("
Thank you for sharing your suggestions with us. We believe it is vital that our patrons advise us in our quest to provide a perfect experience on our site.
