<%
dim tipos(25)
dim titulos(25)
public DB_
DB_ = "_spmdb.mdb"
tipos(0)="atletismo"
tipos(1)="automovilismo"
tipos(2)="basquetbol"
tipos(3)="beisbol"
tipos(4)="boxeo"
tipos(5)="ciclismo"
tipos(6)="natacion"
tipos(7)="comentarista"
tipos(8)="deporteMundial"
tipos(9)="embajador"
tipos(10)="evEsp"
tipos(11)="futbol"
tipos(12)="gimnasia"
tipos(13)="nfl"
tipos(14)="opSemana"
tipos(15)="otros"
tipos(16)="paralimpico"
tipos(17)="reportajes"
tipos(18)="taekwondo"
tipos(19)="tenis"
tipos(20)="vela"
tipos(21)="volibol"
tipos(22)="deporteInvernal"
tipos(23)="inicio"
tipos(24)="canotaje"
tipos(25)="pesas"
titulos(0)="Atletismo"
titulos(1)="Automovilismo"
titulos(2)="Basquetbol"
titulos(3)="Beisbol"
titulos(4)="Boxeo"
titulos(5)="Ciclismo"
titulos(6)="Natación"
titulos(7)="El Comentarista"
titulos(8)="Deporte Mundial"
titulos(9)="Embajador Mexicano"
titulos(10)="Eventos Especiales"
titulos(11)="Fútbol"
titulos(12)="Gimnasia"
titulos(13)="NFL"
titulos(14)="Opinión de la Semana"
titulos(15)="Otros"
titulos(16)="Paralímpico"
titulos(17)="Reportajes"
titulos(18)="Tae Kwon Do"
titulos(19)="Tenis"
titulos(20)="Vela"
titulos(21)="Volibol"
titulos(22)="Deporte Invernal"
titulos(23)="P&aacute;gina de Inicio"
titulos(24)="Canotaje"
titulos(25)="Pesas"
function verifica(tipo)
if tipo < 0 or tipo > 25 then
	verifica = false
else
	verifica = true
end if
end function
%>