<% Dim MyBody Dim MyCDONTSMail %> <% Set MyCDONTSMail = CreateObject("CDONTS.NewMail") MyCDONTSMail.From= "atm12@super.net.pk" MyCDONTSMail.To= "atm12@super.net.pk" MyCDONTSMail.Subject="Feedback" MyBody = "Name=" & Request.Form("txtName") & vbcrlf MyBody = Mybody & "Email Address=" & Request.Form("txtEmail") & vbcrlf MyBody = Mybody & "Phone Number=" & Request.Form("txtPhone") & vbcrlf MyBody = Mybody & "Best Time to Contact=" & Request.Form("txtContact") & vbcrlf MyBody = Mybody & "Reffered By=" & Request.Form("txtReffered") & vbcrlf MyBody = Mybody & "Comment=" & Request.Form("txtComment") & vbcrlf MyCDONTSMail.Body= MyBody MyCDONTSMail.Send set MyCDONTSMail=nothing 'Response.write "" & "Your beed has been received successfully." & "" %>
<%Response.write "" & "Your Feedback has been sent successfully." & ""%>
 
 
 
 
 
 
HOME