<%
dim conect, rsTarifas, classe
set conect=server.CreateObject("ADODB.connection")
conect.Open "dsn=gothic_point"
'
'Creo el recordset a la taula on hi ha les nacionalitats que hi ha a la web
'
set rsTarifas=server.CreateObject("ADODB.recordset")
rsTarifas.Open "SELECT * FROM tbl_tarifes",conect,1,2
if rsTarifas.EOF=true or rsTarifas.BOF=true then
Response.Write("