ecco il codice..come vedi ho levato i "tr" di troppo ma il risultato non cambia.
<html>
<head>
<title>List Articles</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="80%" height="143" border="0" align="center" cellpadding="0" cellspacing="0" class="ruta">
<%
For i=1 to rsoldnews.PageSize
bolVisa = rsOldnews("visa")
select case bolVisa
case "1" %>
<tr>
<tr class="RigaRossa">
<td width="62" rowspan="2" valign="top"><a href= "articolo.asp?id=<% =rsOldnews("id")%>">
</a>[img]<% =strImageFolder & rsOldnews([/img]"width="60"></td>
<td width="551" valign="top"><a href= "articolo.asp?id=<% =rsOldnews("id")%>">
<% =rsOldnews("Rubrik") %>
</a></td>
</tr>
<tr>
<td height="51" align="left" valign="top">
<% dim str_miaVar
str_miaVar = rsOldnews("Nyheter")
if Len(str_miaVar)>150 then
response.write(left(str_miaVar,150) & "...")
else
response.write(str_miaVar)
end if %>
</td>
</tr>
<%
case "0"
%>
<tr class="RigaGialla">
<td rowspan="2" valign="top">[img]<% =strImageFolder & rsOldnews([/img]"width="60"></td>
<td valign="top"><a href= "articolo.asp?id=<% =rsOldnews("id")%>">
<% =rsOldnews("Rubrik") %>
</a></td>
</tr>
<td align="left" valign="top">
<% =rsOldnews("Nyheter") %>
</td>
</tr>
<%
end select
rsOldnews.movenext
If rsoldnews.EOF Then Exit For
next
%>
</table>
<table width="75%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<div align="center">
<%
If ( pag > 1) Then
Response.Write("Pagina precedente")
End If
If ( pag < rsoldnews.PageCount ) Then
Response.Write( "Pagina successiva")
End If
%>
</div></td>
</tr>
</table>
</body>
</html>