<%@ Language=VBScript %> <% dim strBody On error Resume Next Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "65.98.41.82" Mail.From = "manjunath@graycells.in" Mail.AddAddress "manjunath@graycells.in" Mail.FromName = "Greycells" Mail.Subject = "Feedback Forma Submited" strBody="Hai, : " & Request.Form("fname") strBody= strbody & chr(13)+chr(10) & "Date : " & date() strBody= strbody & chr(13)+chr(10) & "Last Name : " & Request.Form("lname") strBody= strbody & chr(13)+chr(10) & "First Name : " & Request.Form("fname") strBody= strbody & chr(13)+chr(10) & "Sex : " & Request.Form("radiobutton") strBody= strbody & chr(13)+chr(10) & "First Name : " & Request.Form("fname") strBody= strbody & chr(13)+chr(10) & "Age : " & Request.Form("age") strBody= strbody & chr(13)+chr(10) & "Email : " & Request.Form("email") strBody= strbody & chr(13)+chr(10) & "Address : " & Request.Form("address") strBody= strbody & chr(13)+chr(10) & "Pin : " & Request.Form("pin") strBody= strbody & chr(13)+chr(10) & "Telephone : " & Request.Form("telno") strBody= strbody & chr(13)+chr(10) & "Mobile No. : " & Request.Form("mobno") strBody= strbody & chr(13)+chr(10) & "Currently Working : " & Request.Form("workingat") strBody= strbody & chr(13)+chr(10) & "First Name : " & Request.Form("fname") strBody= strbody & chr(13)+chr(10) & "Work Experiance : " & Request.Form("workexp") strBody= strbody & chr(13)+chr(10) & "Resume : " & Request.Form("resume") Mail.Body = strBody On error Resume Next Mail.Send If Err > 0 then response.write "Error encountered: " & err.description end if Response.Redirect "ok.asp?ID=CAREERS&Email="& request.Form("email")&"&NAME=" & Request.Form("lname") %>