%
dim strString
strString="User at jaistv.com has submitted feedback
Details are as following:
Your Name: "& request.Form("name") &"
Address : "& request.Form("address") &"
Email : "& request.Form("email") &"
Phone No :"& request.Form("phone")&"
Mobile :"& request.Form("mobile") &"
Message :"& request.Form("message")
'Response.Write(strString)
' Set objCDOSYSMail = Server.CreateObject("CDO.Message")
'Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
'objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="www.ndf.in"
'objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
'objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
'objCDOSYSCon.Fields.Update
'Set objCDOSYSMail.Configuration = objCDOSYSCon
'objCDOSYSMail.From = "info@ndf.in"
'objCDOSYSMail.To = "info@ndf.in"
'objCDOSYSMail.cc = "poonam@indiabusinesszone.com"
'objCDOSYSMail.Subject = "User's Booking Details!"
'objCDOSYSMail.HTMLBody = strString
'objCDOSYSMail.Send
'Set objCDOSYSMail = Nothing
'Set objCDOSYSCon = Nothing
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
'Outgoing SMTP server
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "74.52.76.178"
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objCDOSYSCon.Fields.Update
Set objCDOSYSMail.Configuration = objCDOSYSCon
objCDOSYSMail.From = "cfc@jaistv.com"
objCDOSYSMail.To = "mdjaistv@yahoo.co.in"
objCDOSYSMail.bcc = "jaistv@gmail.com"
objCDOSYSMail.Subject = "Feedback Details!"
objCDOSYSMail.HTMLBody = strString
objCDOSYSMail.Send
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing
'set mymail=server.createobject("cdonts.newmail")
'mymail.mailformat=0
'mymail.bodyformat=0
'mymail.from=request.Form("email")
'mymail.to="info@ndf.in"
'mymail.cc="poonam@indiabusinesszone.com"
'mymail.subject="Feedback at ndf"
'mymail.body=a
'mymail.send
'set mymail=nothing
%>
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||