| ||||
este es el código: <TABLE cellSpacing=1 cellPadding=0 align=left border=0> <TBODY> <TR> <TD align=center width=350>Descricpión</TD> <TD align=center width=100 colspan=2></TD> </TR> <% Dim sql, rs, irow sql = "select * from CENTRO_TRABAJO order by descripcion" set rs = conexion.Execute(sql) irow = 0 If Not(rs.EOF) then rs.MoveFirst Do While Not(rs.EOF) cod = rs("cod_centro_trabajo") irow = irow + 1 if (irow mod 2)=0 then %> <TR style="background-color:#daeafa" class=clsListData> <% else %> <TR class=clsListData> <% end if %> <TD align="left" width=350> <% Response.Write(rs("descripcion")) %></TD> <TD vAlign="middle" align=center width=50> <INPUT type=image alt="Editar" src="images/edit2.gif" name=edit onclick="location.href='editar_admision_centrotrab ajo.asp?cod=<%Response.Write(cod)%>'"> </TD> <TD vAlign="middle" align=center width=50> <INPUT type=image alt="Eliminar" src="images/delete.gif" name=delete onclick="location.href='elimina_admision_centrotra bajo.asp?cod=<%Response.Write(cod)%>'"> </TD> </TR> <% rs.MoveNext Loop End If %> </TBODY> </TABLE>
__________________ Tarecito |