<% name = Request.Form("name") cell= Request.Form("cell") email = Request.Form("email") contactperson= Request.Form("contactperson") designation = Request.Form("designation") toEmail = Request.Form("toEmail") subject = Request.Form("subject") cBody = "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "

name	"&name&"
cell	"&cell&"
email	"&email&"
contactperson	"&contactperson&"
designation	"&designation&"

" Set cMail = Server.CreateObject("Persits.MailSender") cMail.Host = "mail.mktyagi.com" cMail.From = email cMail.AddAddress toEmail cMail.Subject = subject cMail.Body = cBody cMail.IsHTML = True On Error Resume Next cMail.Send If Err <> 0 Then 'error occured eflag = 1 emsg = Err.Description Else eflag = 0 emsg = "" End If response.redirect "saqs.asp?name="&name&"&eflag="&eflag&"&emsg="&emsg %>