La verdad, no le veo nada raro. Prueba a quitar esa linea y hacerle el bucle directamente:
Código:
cod_activi=request.QueryString("cod")//recogo el código de actividad que envia inc/menuizd.asp
//consulta a tabla gce_empresas
sqlc ="select * from gce_empresas where EMP_ACT='"&cod_activi&"'"
Set rsc = Server.CreateObject("ADODB.Recordset")
rsc.Open sqlc, my_conn, 3, 3
do while not rsc.eof
response.Write("<tr>")
response.Write("<td><b>"& rsc("EMP_NOM")&"</b><br>")
response.Write(""&rsc("EMP_DIR")&"<br>")
response.Write(""&rsc("EMP_CP")&" "&rsc("EMP_ POB")&"<br>")
response.Write("("&rsc("EMP_PRO")&") "&rsc("E MP_PAI")&"<br>")
response.Write( "<a HREF='http://"&rsc("EMP_WEB")&"' target='_blank'>ver web</a>")
response.Write("<div align='right'><a HREF='frm_editar.asp?cod_emp="&rsc("EMP_COD")&"&co d_act="&cod_activi&"'>Modificar</a></div></td>")
response.Write("</tr>")
rsc.MoveNext
cuantos = cuantos +1
loop
Quitale includes, quitale el movefirst y haz el bucle hasta EOF Al menos te dirá si todo lo relacionado con la BD esta bien. Es raro porque todo parece en orden.
El response.Write("</tr>") ponlo dentro del loop si no te va a destrozar el HTML :D
Un saludo
NOTA: Supongo que my_conn esta definido en alguna parte que no veo