<%


Dim tb_status, tb_description, tb_keywords, tb_url, tb_company
Dim tb_color_1, tb_color_2, tb_color_3, tb_color_4
Dim tb_currency, tb_address1, tb_address2, tb_city, tb_state, tb_zip
Dim tb_phone, tb_fax, tb_email, tb_partial_email, tb_default_location
Dim connect, tb_dbconn, counter, data_source, tb_allow_html, tb_convert_breaks


tb_status = "Vincennes YMCA"
tb_description = ""
tb_keywords = ""
tb_company = "Vincennes YMCA"
tb_address1 = "2010 College Ave"
tb_address2 = ""
tb_city = "Vincennes"
tb_state = "Indiana"
tb_zip = "47591"
tb_phone = "812-895-YMCA"
tb_fax = ""
tb_email = "info@vincennesymca.org"
tb_partial_email = "@vincennesymca.org"
tb_default_location = "Vincennes"
tb_url = "ymca.towerbridgetech.local"
tb_color_1 = "#7C93D9"
tb_color_2 = "#A2B0DD"
tb_color_3 = "#EDF0F9"
tb_color_4 = "#EAEEF9"
tb_color_5 = "#B7C2F0"
tb_currency = "$"
tb_allow_html = "yes"
tb_convert_breaks = "no"
%>

<%
'**********************************************************************************************************
'connect to database
data_source = Server.Mappath("database\ymca_db.mdb")
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Data Source=" & data_source & ";Provider=Microsoft.Jet.OLEDB.4.0;"
'**********************************************************************************************************
%>

<%
'Common querystrings etc

Dim chosenaction, chosenparagraph, chosencontent, chosenjob, chosencode
Dim chosenpage, chosennews, chosensearch, chosenmessage

chosenaction = request.QueryString("action")
chosencode = request.QueryString("code")
chosenpage = request.QueryString("page")
chosenparagraph = request.QueryString("paragraph")
chosencontent = request.QueryString("content")
chosenjob = request.QueryString("job")
chosennews = request.QueryString("news")
chosensearch = request.QueryString("search")
chosenerror = request.QueryString("error")
chosenevent = request.QueryString("event")
chosenmessage = request.QueryString("msg")
%>


<!--#INCLUDE VIRTUAL="inc/function_system.asp" -->
<!--#INCLUDE VIRTUAL="inc/function_content.asp" -->
<!--#INCLUDE VIRTUAL="inc/function_employment.asp" -->
<!--#INCLUDE VIRTUAL="inc/function_images.asp" -->
<!--#INCLUDE VIRTUAL="inc/function_news.asp" -->
<!--#INCLUDE VIRTUAL="inc/function_search.asp" -->
<!--#INCLUDE VIRTUAL="inc/function_events.asp" -->