NCSAA - Speakers' Bureau Registration

<% ' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit. On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 1252 Session.LCID = 1033 Err.Clear strErrorUrl = "speakers_bureau_registration.asp" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("speakers_bureau_registration_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "Results", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(9) Dim arFormDBFields0(9) Dim arFormValues0(9) arFormFields0(0) = "First_Name" arFormDBFields0(0) = "First_Name" arFormValues0(0) = Request("First_Name") arFormFields0(1) = "Email_Address" arFormDBFields0(1) = "Email_Address" arFormValues0(1) = Request("Email_Address") arFormFields0(2) = "Possible_Speaking_Topics" arFormDBFields0(2) = "Possible_Speaking_Topics" arFormValues0(2) = Request("Possible_Speaking_Topics") arFormFields0(3) = "Last_Name" arFormDBFields0(3) = "Last_Name" arFormValues0(3) = Request("Last_Name") arFormFields0(4) = "Phone_Number" arFormDBFields0(4) = "Phone_Number" arFormValues0(4) = Request("Phone_Number") arFormFields0(5) = "City" arFormDBFields0(5) = "City" arFormValues0(5) = Request("City") arFormFields0(6) = "Cost" arFormDBFields0(6) = "Cost" arFormValues0(6) = Request("Cost") arFormFields0(7) = "Current_Position" arFormDBFields0(7) = "Current_Position" arFormValues0(7) = Request("Current_Position") arFormFields0(8) = "State" arFormDBFields0(8) = "State" arFormValues0(8) = Request("State") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type" End If If Request.ServerVariables("REMOTE_HOST") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name" End If FP_SaveFieldToDB fp_rs, Now, "Timestamp" If Request.ServerVariables("REMOTE_USER") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name" End If fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close Session("FP_SavedFields")=arFormFields0 Session("FP_SavedValues")=arFormValues0 Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") Response.Redirect "form_submission_confirmation.htm" End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> NCSAA - Speakers' Bureau Registration

Awards

Recruiting Service

Stat Ranking

Service

NCSAA Speakers' Bureau

If you are interested in being listed as part of the NCSAA Speakers' Bureau, please submit the form below, and we'll add you to our Speakers' Bureau.

The NCSAA Speakers' Bureau is a resource for Christian schools across the country to use, as they seek speakers for their sports banquets and other athletic-related events. Schools will contact you directly, if they are interested in having you speak at an event.

There is no cost for individuals to be listed as part of the Speakers' Bureau. This is a service that is offered to NCSAA member schools, and is intended to serve Christian schools and encourage those schools' development of excellent athletic programs.

First Name:

Last Name:

City:

State:

Phone Number:

E-mail Address:

Current Position and/or Place of Work:

Topics on which you might be interested in speaking:

Cost per speaking engagement (indicate specific cost, "Expenses", "Negotiable", or "Free Will Offering":