exactamente era como decias !!!!!!!! un fenomeno lo tuyo!!!!!!!!! dejo el codigo por si a alquien le ayuda . muchisimas gracias!!!!!!!!!!!!!!!!
<%
counter=0
Do While Not Rs.EOF
date1 = rs("data")
id = rs("ID")
name1 = rs("titulo")
link = "<a href='view.asp?id=" & id & "'>" & name1 & "</a>"
copete = rs("copete")
materia = rs("materia")
description = name1
%>
<td><div align="center">
<br>
<img src="imagens/<%=rs("foto")%>" width="81" height="58" hspace="8" vspace="2" border="0">
<% =link%>
<%
counter=counter+1
If counter Mod 4=0 Then Response.Write "</tr><tr>"
Rs.MoveNext
Loop
end if
next
%>
</tr>
</table>