<%
Set DB = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.recordset")
DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("../../db/_spmdb.mdb"))
SQL = "SELECT * FROM _scroll"
rs.open SQL, DB,3,3
response.Write "deporte1 = " & rs.fields("deporte1") & "
"
response.Write "deporte2 = " & rs.fields("deporte2") & "
"
response.Write "deporte3 = " & rs.fields("deporte3") & "
"
response.Write "deporte4 = " & rs.fields("deporte4") & "
"
response.Write "deporte5 = " & rs.fields("deporte5") & "
"
response.Write "deporte6 = " & rs.fields("deporte6")
%>