<% ' Required Field Check ' Change this to include at least one field from the form being processed If Request.Form("name") = "" Then Response.Write "You must supply a name. Please hit your Back button." Response.End End If Set Mailer = Server.CreateObject("CDONTS.NewMail") Mailer.From = "postmaster@innerhost.com" Mailer.To = "melaniel@rtnda.org" Mailer.Subject = "Diverity Toolkit Request from Web" strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Hello; I would like to order a Diversity Toolkit:" strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Name: " &Request.Form("name")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Title: " &Request.Form("title")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Station: " &Request.Form("station")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Street Address: " &Request.Form("street")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "City/State/ZIP: " &Request.Form("city")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Phone: " &Request.Form("phone")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "Email: " &Request.Form("email")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & "How did you hear about it? " &Request.Form("comments")& vbCrlf strMsgInfo = strMsgInfo & vbCrLf strMsgInfo = strMsgInfo & vbCrLf strMsgHeader = "Request Generated from www.rtnda.org" & vbCrLf & "*************" strMsgFooter = vbCrLf & "*************" Mailer.Body = strMsgHeader & strMsgInfo & strMsgFooter Mailer.Send Response.Redirect ("/training/thanks.shtml") %>