% Dim ID ID = session(" NewId" ) Dim myCDONTSMail Set myCDONTSMail= CreateObject("CDONTS.NewMail" ) myCDONTSMail.From = "brumbaugh@kyha.com" myCDONTSMail.To = "brumbaugh@kyha.com" myCDONTSMail.Subject = "Videotape_Loaner_Library_Request" myCDONTSMail.Body = Request.Form("Videotape_Loaner_Library_Request" ) & " ' s inquiry has been added to the " & Request.Form(" Form_Type" ) & " database as ID" & ID & " ." myCDONTSMail.BodyFormat= 0 myCDONTSMail.MailFormat= 0 myCDONTSMail.Importance= 2 myCDONTSMail.Send Set myCDONTSMail= Nothing %>