tribpreps.com - All-State Boys' Soccer

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% '*****Open A Connection to the database ' Set OBJdbConnection = Server.CreateObject("ADODB.Connection") 'OBJdbConnection.Open "preps",_ '"DATABASE=preps;UID=sltrib;PWD=;DSN=preps" Set OBJdbConnection = Server.CreateObject("ADODB.Connection") OBJdbConnection.Open "prepsmonedb",_ "DATABASE=sltrib_preps;UID=sltribpreps;PWD=preps09;DSN=prepsmonedb" %> <% If request.servervariables("REQUEST_METHOD")= "POST" then fullname=request.form("fullname") fullname= REPLACE(fullname, "'","''") school=request.form("school") school= REPLACE(school, "'","''") emailaddress=request.form("emailaddress") emailaddress= REPLACE(emailaddress, "'","''") phonenumber=request.form("phonenumber") phonenumber= REPLACE(phonenumber, "'","''") dateentered=date dateentered=funcMySqlDate(dateentered) goalkeeper1=request.form("goalkeeper1") goalkeeper1= REPLACE(goalkeeper1, "'","''") goalkeeper2=request.form("goalkeeper2") goalkeeper2= REPLACE(goalkeeper2, "'","''") goalkeepers = goalkeeper1 & "; " & goalkeeper2 defender1=request.form("defender1") defender1= REPLACE(defender1, "'","''") defender2=request.form("defender2") defender2= REPLACE(defender2, "'","''") defender3=request.form("defender3") defender3= REPLACE(defender3, "'","''") defender4=request.form("defender4") defender4= REPLACE(defender4, "'","''") defenders = defender1 & "; " & defender2 & "; " & defender3 & "; " & defender4 midfielder1=request.form("midfielder1") midfielder1= REPLACE(midfielder1, "'","''") midfielder2=request.form("midfielder2") midfielder2= REPLACE(midfielder2, "'","''") midfielder3=request.form("midfielder3") midfielder3= REPLACE(midfielder3, "'","''") midfielder4=request.form("midfielder4") midfielder4= REPLACE(midfielder4, "'","''") midfielder5=request.form("midfielder5") midfielder5= REPLACE(midfielder5, "'","''") midfielder6=request.form("midfielder6") midfielder6= REPLACE(midfielder6, "'","''") midfielders= midfielder1 & "; " & midfielder2 & "; " & midfielder3 & "; " & midfielder4 & "; " & midfielder5 & "; " & midfielder6 forward1=request.form("forward1") forward1= REPLACE(forward1, "'","''") forward2=request.form("forward2") forward2= REPLACE(forward2, "'","''") forward3=request.form("forward3") forward3= REPLACE(forward3, "'","''") forward4=request.form("forward4") forward4= REPLACE(forward4, "'","''") forwards= forward1 & "; " & forward2 & "; " & forward3 & "; " & forward4 ValueString= "'"& fullname &"','"& school &"','"& emailaddress &"','"& phonenumber &"','"& dateentered &"','"& goalkeepers &"','"& defenders &"','"& midfielders &"','"& forwards &"'" SQLinsert = "INSERT INTO sltrib_preps.allstateboyssoccer (fullname, school, emailaddress, phonenumber, dateentered, goalkeepers, defenders, midfielders, forwards) VALUES ("& ValueString &")" OBJdbConnection.Execute(SQLinsert) response.redirect("allstatevotethanks.asp") end if %> tribpreps.com - All-State Boys' Soccer

All-State Boys' Soccer Ballot
Coaches can submit their all-state ballots. The Tribune will verify the authenticity of each ballot. Please write in name and school in the box provided.

Coach Name
School Affiliation
Phone Number
Email
	The information submitted above will be verified.

Two Goalkeepers


Four Defenders





Six Midfielders







Four Forwards

<% ' OBJdbConnection.Close ' Set OBJdbConnection=Nothing %>