Cambialo così, spero vada meglio
<% Dim Cont%>
<div id="Layer1" style="position:absolute; width:644px; height:115px; z-index:1; left: 161px; top: 52px;">
<table width="100%" border="0">
<tr>
<%For Cont = 1 to 7%>
<%if cont=1 then %>
<td width="50%"><%response.write Cont%></td>
<td width="50"></td>
</tr><tr>
<%else%>
<td width="50%">
<%
response.write Cont
%>
</td>
<%
if cont mod 2 = 0 AND cont <> 2 then
%>
</tr><tr>
<%
end if
<%end if%>
<%next%>
</tr>
</table>
</div>