<!--#include file="../sistema/abredb.asp"-->
<%
ceteg=request.QueryString("cate")
sw=0
set RS = server.CreateObject("adodb.recordset")
Sql = "SELECT * FROM Faenas, Maquina WHERE (((Faenas.Idfaena)=[Maquina].[codFaena]) AND ((Maquina.Categoria)='"&ceteg&"'))ORDER BY Maquina.codigo;"
Rs.open Sql,oConn,1,3
%>
<html>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<link href="../css/admin.css" rel="stylesheet" type="text/css">
<link href="../css/sortabletable.css" rel="stylesheet" type="text/css">
<link href="../pantalla/estilo.css" rel="stylesheet" type="text/css">
<body>
<table width='93%' class='sort-table' id='table-1'border="0" cellpadding="2" cellspacing="0" >
<col style='text-align: left'/>
<col style='text-align: left'/>
<col style='text-align: left' />
<thead>
<tr>
<td title='R.U.T. Cliente'><nobr>Codigo</nobr></td>
<td title='Nombre Cliente'><nobr>Marca</nobr></td>
<td title='Apellido Paterno'><nobr>Modelo</nobr></td>
<td title='Apellido Materno'><nobr>Ubicacion</nobr></td>
</tr>
</thead>
<tbody>
<%Do While Not RS.Eof
sw=1%>
<tr onmouseover="this.style.background='#EFFBFC';this. style.cursor='pointer';" onmouseout="this.style.background='#FFFFFF'" onclick="location.href='maq.asp?codi=<%=Rs.Fields( "Codigo")%>'">
<td ><nobr> <%=Rs.Fields("Codigo")%></nobr><input type="hidden" name="codi" value=""></a></td>
<td ><nobr> <%=Rs.Fields("Marca")%></nobr></td>
<td ><nobr> <%=Rs.Fields("Modelo")%></nobr></td>
<td ><nobr> <%=Rs.fields("nomfae")%></nobr></td>
</tr>
<%
Rs.movenext
loop
if (sw=0)then%>
<tr>
<td colspan=4 align=center>No hay datos para listar...</td>
</tr>
<%end If%>
</tbody>
</table>
</body>
</html>
ESTE ES EL CODIGO QUE TENGO YO intenta hacerlo haci si quieres pero como tienes la pag termida solo seria para que no tubieras que hacer muchas tablas y solo manejas filas