Problema es una asp

[Hereze]

Hola a todos,

tengo una página asp donde quiero que se listen el contenido de dos tablas. Necesito que en una de ellas muestre sólo 10 registros, mientras que en la otra muestre sólo 5.
Sé como hacer que en esta página me muestre dichos registros de una de las tablas, el problema viene cuando intento meter los dos listados en una misma asp. No hay forma de que me salga.
Os pongo el código que he utilizado en una de ellas, en el otro sería el mismo pero apuntando a otra tabla.

Aquí conecto con la tabla y le indico los datos que necesito:

<%
'Para los redireccionamientos
Response.Buffer=True

SQL="SELECT * FROM " & _
"tbl_soporte_noticias order by tbl_soporte_noticias.noticias_fecha Desc"

'Ejecutamos consulta
set rs=oConn.Execute(SQL)

Session("id")=rs("id")
Session("noticias_noticia")=rs("noticias_noticia")
Session("noticias_cliente")=rs("noticias_cliente")
Session("noticias_creado_por")=rs("noticias_creado _por")
Session("noticias_fecha")=rs("noticias_fecha")
Session("noticias_link")=rs("noticias_link")

%>

A continuación os pongo el código que utilizo para que me muestre los resultados de 10 en 10:

<%
cantidadregistros=100
%>

<%
if request.querystring("paginaactual")<>"" then
mostrarpagina=request.querystring("paginaactual")
else
mostrarpagina=1
end if
%>

<%

set rs=Server.CreateObject("ADODB.Recordset")
rs.cachesize=60
rs.open SQL, oConn, 3, 3

%>

<%
rs.pagesize=cantidadregistros
maxpagina=cint(rs.pagecount)
maxregistros=cint(rs.pagesize)
rs.absolutepage=mostrarpagina
contreg=0
%>

<%
if int(mostrarpagina)<>int(maxpagina) then
hasta=mostrarpagina*50
desde=hasta-99
else
hasta=rs.recordcount
desde=(maxpagina*10)-99
end if
%>

Y aquí está el código donde sale la tabla y donde se muestran los resultados:

<table border="0" cellpadding="0" cellspacing="0" width="100%" bordercolor="#000000" id="table9">
<tr>
<td>

<table class="tabla_sin_agrupar" id="table10" width="94%">


<thead>
</thead>


<form method="post" action="https://pc.arsys.es/default.pl"></form>
<tbody><tr class="lineaimpar">
<td class="texto_columna_ppal_tabla" width="9%" align="center" style="background-color: #4085CA">
<b>
<font size="2" color="#FFFFFF">Fecha</font></b></td>

<b>
<font face="Verdana" size="2" color="#FFFFFF">
<td class="texto_columna_ppal_tabla" width="23%" align="center" style="background-color: #4085CA">
<b>
<font size="2" color="#FFFFFF">Cliente</font></b></td>

<td class="texto_columna_ppal_tabla" width="55%" align="center" style="background-color: #4085CA">
<b>
<font size="2" color="#FFFFFF">Noticia</font></b></td>

<td class="texto_columna_ppal_tabla" width="10%" align="center" style="background-color: #4085CA">
<b>
<font size="2" color="#FFFFFF">Creado por</font></b></td>

</tr>

<%
do while not rs.eof and contreg < maxregistros
%>

<tr class="lineapar">
<td class="texto_columna_ppal_tabla" width="9%" bordercolor="#FFFFFF" style="background-color: #FFFFFF" align="left">
<font size="2" color="#8B8B8B">
<%=rs("noticias_fecha")%></font></td>
<td class="texto_columna_ppal_tabla" width="23%" bordercolor="#FFFFFF" style="background-color: #FFFFFF" align="left">
<font size="2" color="#8B8B8B">
<%=rs("noticias_cliente")%></font></td>
<td class="texto_columna_ppal_tabla" width="55%" bordercolor="#FFFFFF" style="background-color: #FFFFFF" align="left">
<a target="__blank" href="<%=rs("noticias_link")%>">
<font size="2" color="#8B8B8B"><%=rs("noticias_noticia")%></font></td>

<td class="texto_columna_ppal_tabla" width="10%" bordercolor="#FFFFFF" style="background-color: #FFFFFF" align="left">
<font size="2" color="#8B8B8B">
<%=rs("noticias_creado_por")%></font></td>
</tr>
<%
contreg=contreg+1
rs.MoveNext
loop
%>


</tbody></table>
</font></p>

</table>
<p align="right">
<%
rs.Close
oConn.Close
set rs=nothing
set oConn=nothing
%></div>

Este código funciona perfectamente, el problema viene cuando quiero hacer lo mismo dentro de esta página pero apuntando aotra tabla, mas o menos esto:

<%
Dim oConn, rs, SQL, oConn1, rs1, SQL1
%>

<%
'Para los redireccionamientos
Response.Buffer=True

SQL1="SELECT * FROM " & _
"tbl_pro_soporte_principal_actualizaciones order by tbl_pro_soporte_principal_actualizaciones.fecha Desc"

'Ejecutamos consulta
set rs=oConn.Execute(SQL1)

Session("id")=rs("id")
Session("fecha")=rs("fecha")
Session("actualizacion")=rs("actualizacion")
Session("link")=rs("link")

%>


<%
'Para los redireccionamientos
Response.Buffer=True

SQL="SELECT * FROM " & _
"tbl_soporte_noticias order by tbl_soporte_noticias.noticias_fecha Desc"

'Ejecutamos consulta
set rs=oConn.Execute(SQL)

Session("id")=rs("id")
Session("noticias_noticia")=rs("noticias_noticia")
Session("noticias_cliente")=rs("noticias_cliente")
Session("noticias_creado_por")=rs("noticias_creado _por")
Session("noticias_fecha")=rs("noticias_fecha")
Session("noticias_link")=rs("noticias_link")

%>

Aquí es donde me quedo parado, necesito que en una tabla me liste los 5 primeros registros de la primera consulta y en otra tabla los diez primeros registros de la segunda consulta.

¿Sabéis cómo lo puedo hacer?

Gracias.

[JuanRAPerez]

ELECT top 5 * FROM tutablade5
ELECT top 10 * FROM tutablade10

suerte

[Hereze]

Iniciado por JuanRAPerez

ELECT top 5 * FROM tutablade5
ELECT top 10 * FROM tutablade10

suerte

Hola,

las consultas sé hacerlas, ese no es el problema, lo que no sé es como hacerlas al mismo tiempo. Es decir, el código que he puesto, lo que hace es listar los resultados de una tabla de 10 en diez. Lo que no sé es como hacer que en esa misma página asp, me muestre también los 10 registros de otra tabla.

Saludos.

[JuanRAPerez]

oki
entonces solo es problema de logica


SQL="select como tu sabes hacerlo"
set rs=oConn.Execute(SQL)
recorro el RS
imprimo el RS
cierro RS


SQL2="select como tu sabes hacerlo numero dos"
set rs2=oConn.Execute(SQL2)
recorro el RS2
imprimo el RS2
cierro RS2

cierro base de datos

suerte

set rs=oConn.Execute(SQL)