<%
dim myconnection
dim rs
dim rstype
dim SQLQuery, sqlerror
set myconnection = Server.CreateObject("ADODB.Connection")
myconnection.open ("Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("\db\history.mdb"))
SQLQuery = "Select * from tournwinners"
set rs = Server.CreateObject("ADODB.Recordset")
set rs = myconnection.Execute(SQLQuery)
%>
The Executive Director is selected by the SBC Board of
Directors and the remaining officers are rotated up on a
yearly basis. There is one officer for each of our
nine member states unless that state becomes inactive.
<%
rs.movefirst
do until rs.eof
rstype = rs("EVENT")
if rstype = "AH" then
%>
<%Response.Write rs("SCORE")%>Executive
Director
President
<%
end if
rs.movenext
loop
set rs = nothing
set myconnection = nothing
%>
Bill Blackburn
1571 Courtfield Lane
Collierville, TN. 38017
(901) 853-3444 EMAIL
Neil Campbell
2190 Skyline Dr.
Warrior, AL. 35180
(205) 647-3201
1st Vice President
James Hostler
301 St. Lukes Dr.
Richardson, TX. 75080
(972) 235-5505
2nd Vice President
Ricky Achord
26230 Whispering Pines
Denham Springs, LA. 70726
(225) 667-2750 Email
3rd Vice President
Wayne Kuykendall
1401 Cloverdale Dr.
Hixson, TN. 37343
(423) 875-2653
