<% Dim strFrom, strTo, strSubject, strBody Dim objCDOMail 'The CDO object strTo = "secretariat@tamilinternet.org" strFrom = request.form("Email") strSubject = "Conference Registration Details!" strBody = "This message was sent from http://www.tamilinternet.org " & vbCrLf strBody = strBody & "The following new Conference Registration request been submited: " & vbCrLf strBody = strBody & "Title : " & trim(request.form("Title")) & vbCrLf strBody = strBody & "First Name : " & trim(request.form("FName")) & vbCrLf strBody = strBody & "Last Name : " & trim(request.form("LName")) & vbCrLf strBody = strBody & "Full Name : " & trim(request.form("FullName")) & vbCrLf strBody = strBody & "Email : " & trim(request.form("Email")) & vbCrLf strBody = strBody & "Tel : " & trim(request.form("Tel")) & vbCrLf strBody = strBody & "Fax : " & trim(request.form("Fax")) & vbCrLf strBody = strBody & "Country : " & trim(request.form("Country")) & vbCrLf strBody = strBody & "Address : " & trim(request.form("Address")) & vbCrLf strBody = strBody & "City : " & trim(request.form("City")) & vbCrLf strBody = strBody & "Post Code / Zip : " & trim(request.form("Zip")) & vbCrLf strBody = strBody & "Organisation : " & trim(request.form("Organisation")) & vbCrLf strBody = strBody & "Profession : " & trim(request.form("Professional")) & vbCrLf strBody = strBody & "Position : " & trim(request.form("Position")) & vbCrLf strBody = strBody & "Registration Type : " & trim(request.form("Registration_Type")) & vbCrLf strBody = strBody & "Food Preferred : " & trim(request.form("Food_Preferred")) & 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;kiru@tamilinternet.org" objCDOMail.Bcc = "webmaster@tamilinternet.org" objCDOMail.Send Set objCDOMail = Nothing Response.Redirect "http://www.tamilinternet.org" rs.Close set rs = nothing %>