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>