Fòrum Interculturalitat i lleure

<%sqltxt="select * from foros order by foro" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../../dades/interculturalitat/pyr.mdb")) set rs=createobject("ADODB.Recordset") set rsr=createobject("ADODB.Recordset") rs.open sqltxt,conn%> Fòrum Interculturalitat i lleure

<%if rs.eof then%> <%else do while not rs.eof%> <%rs.movenext loop rs.close end if%>

Fòrum obert
No hi ha forums disponibles
<%=rs("foro")%>	">Entra