<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% If Request.ServerVariables("REQUEST_METHOD") = "POST" Then Dim htmlMsg htmlMsg = "" htmlMsg = htmlMsg & writeTR("Last name", Request("lastname")) htmlMsg = htmlMsg & writeTR("First name", Request("firstname")) htmlMsg = htmlMsg & writeTR("Street Address", Request("streetaddress")) htmlMsg = htmlMsg & writeTR("Email", Request("email")) htmlMsg = htmlMsg & writeTR("City", Request("city")) htmlMsg = htmlMsg & writeTR("State", Request("state")) htmlMsg = htmlMsg & writeTR("Zip", Request("zip")) htmlMsg = htmlMsg & writeTR("Phone", Request("phone")) htmlMsg = htmlMsg & writeTR("School", Request("school")) htmlMsg = htmlMsg & writeTR("Graduation", Request("graduation")) htmlMsg = htmlMsg & writeTR("Date", Request("date")) htmlMsg = htmlMsg & writeTR("Time", Request("time")) htmlMsg = htmlMsg & "

TIME: " & Now call sendMail("admission@claflin.edu", "admission@claflin.edu", "New Data", htmlMsg) End If sub sendMail(email_from, email_to, email_subject, email_body) sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = Server.CreateObject("CDO.Configuration") cdoConfig.Fields.Item(sch & "sendusing") = 2 cdoConfig.Fields.Item(sch & "smtpserver") = "10.10.20.3" cdoConfig.fields.update Set cdoMessage = Server.CreateObject("CDO.Message") Set cdoMessage.Configuration = cdoConfig cdoMessage.From = email_from cdoMessage.To = email_to cdoMessage.Subject = email_subject cdoMessage.HTMLBody = email_body cdoMessage.Send Set cdoMessage = Nothing Set cdoConfig = Nothing end sub function writeTR(data, value) writeTR = "" & data & " " & value & "" end function %> Claflin University
Claflin University
Academics Admissions Learn about Claflin campus Infromatin for Current Student Information of Faculty & Staff Alumni
 
 
Admissions
How to Apply
Apply online
Application form in PDF format
Admission inquiry
Tour Schedule
Campus visit
Cost & Fees
Office of Enroll ment Management
Freequently Asked Questions
Contact Admission


 

Campus Tour Schedule


Please let us know when you're planning to visit Claflin. The Admission Office will confirm your appointment via email or US mail. Download and complete the Campus Request form to let our admission staff know that you are on your way!

 
Directory Calendar Copntact Us Siteindex