<% Dim strFrom, strTo, strSubject, strBody Dim objCDOMail 'The CDO object strTo = "anbu@tamilinternet.org" strFrom = request.form("Email") strSubject = "Net For Life Request!" strBody = "This message was sent from http://www.tamilinternet.org " & vbCrLf strBody = strBody & "The following new contact request has been submited: " & vbCrLf strBody = strBody & "Name : " & trim(request.form("Name")) & vbCrLf strBody = strBody & "Email : " & trim(request.form("Email")) & vbCrLf strBody = strBody & "Organisation : " & trim(request.form("Organisation")) & vbCrLf strBody = strBody & "Tel : " & trim(request.form("Tel")) & vbCrLf strBody = strBody & "Country : " & trim(request.form("Country")) & vbCrLf strBody = strBody & "State : " & trim(request.form("State")) & vbCrLf strBody = strBody & "No Of Attendance : " & trim(request.form("No_Of_Attandance")) & vbCrLf strBody = strBody & "Notes : " & trim(request.form("Notes")) & vbCrLf strBody = strBody & vbCrLf ' Some spacing: strBody = strBody & vbCrLf & vbCrLf strBody = strBody & vbCrLf Set objCDOMail = Server.CreateObject("CDONTS.NewMail") objCDOMail.From = strFrom objCDOMail.To = strTo objCDOMail.Subject = strSubject objCDOMail.Body = strBody objCDOMail.Cc = "muthu@tamilinternet.org" objCDOMail.Bcc = "webmaster@tamilinternet.org" objCDOMail.Send Set objCDOMail = Nothing Response.Redirect "http://www.tamilinternet.org" rs.Close set rs = nothing %>