<% Dim Conexion Dim Consulta Dim Tabla Set Conexion = Server.CreateObject("ADODB.Connection") Set Tabla = Server.CreateObject("ADODB.Recordset") Consulta="Select * From TNoticias order by numero Desc" Conexion.Open "DNSRadio" Tabla.Open Consulta,Conexion,2,3,1 %>

MOVIL ACTIVO

 
<% Dim I For i = 1 to 4 %> <% tabla.movenext next%>
" width="100" height="100"> <%=tabla("titulo")%>  A<%=tabla("resumen")%>
 
<% Tabla.close Conexion.close %>