Ok, aquí va, es muy muy laargo... te lo mando en 3 partes (esta primera parte, corresponde a las cabeceras de las capas)
<div id="TabbedPanels1" class="TabbedPanels">
<ul class="TabbedPanelsTabGroup">
<li class="TabbedPanelsTab" tabindex="0">INMUEBLES ALQUILER </a>
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
ssql="select a.cod_tipo, count(*)as cantidad3 from m_anuncios a, m_tipos b where a.cod_tipo=b.cod_tipo and a.cod_tipo=1 group by a.cod_tipo;"
set rs = conexion.Execute(Ssql)
do while not rs.eof
%>
(<%=rs("cantidad3")%>)
<%
rs.movenext
loop
set rs=nothing
'conn.close
'set conn=nothing%>
</li>
<li class="TabbedPanelsTab" tabindex="0">INMUEBLES VENTA </a>
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
ssql="select a.cod_tipo, count(*)as cantidad3 from m_anuncios a, m_tipos b where a.cod_tipo=b.cod_tipo and a.cod_tipo=2 group by a.cod_tipo;"
set rs = conexion.Execute(Ssql)
do while not rs.eof
%>
(<%=rs("cantidad3")%>)
<%
rs.movenext
loop
set rs=nothing
'conn.close
'set conn=nothing%>
</li>
<li class="TabbedPanelsTab" tabindex="0">OBRA NUEVA (PROMOCIONES) </a>
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
ssql="select a.cod_tipo, count(*)as cantidad3 from m_anuncios a, m_tipos b where a.cod_tipo=b.cod_tipo and a.cod_tipo=3 group by a.cod_tipo;"
set rs = conexion.Execute(Ssql)
do while not rs.eof
%>
(<%=rs("cantidad3")%>)
<%
rs.movenext
loop
set rs=nothing
'conn.close
'set conn=nothing%>
</li>
</ul>
<div class="TabbedPanelsContentGroup">
<div class="TabbedPanelsContent"><table width="100%" border="0" cellspacing="0">
<tr>
<td width="72"> </td>
<td width="21"> </td>
<td width="95"> </td>
<td width="40"> </td>
<td width="39"> </td>
<td width="10" colspan="2"> </td>
</tr>