ok poz entonces les copio todo el codigo de la pagina:
<%@LANGUAGE="JAVASCRIPT"%>
<!--#include file="../Connections/Esporlesbc.asp" -->
<%
var Novetats = Server.CreateObject("ADODB.Recordset");
Novetats.ActiveConnection = MM_Esporlesbc_STRING;
Novetats.Source = "SELECT * FROM Novetats WHERE Acceptat=1";
Novetats.CursorType = 0;
Novetats.CursorLocation = 2;
Novetats.LockType = 1;
Novetats.Open();
var Novetats_numRows = 0;
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body {
background-color: #FFCC99;
}
-->
</style></head>
<body topmargin="0" bottommargin="0" >
<table width="560" border="0" align="left" cellpadding="0" cellspacing="3">
<tr>
<td><table width="560" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#000000">
<tr>
<td bgcolor="#CC9933"><div align="center"><strong>Novetats</strong></div></td>
</tr>
</table></td>
</tr>
<%
If Request.Cookies("usuari") <> "" Then
nueva="0"
Else
nueva="1"
End if
If nueva="1" Then
%> <tr>
<td><table width="560" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#000000" bgcolor="#FFFF66">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="56%"><% Response.Write(Novetats.Fields("Titol")) %>
</td>
<td width="44%"><div align="right"><% Response.Write(Novetats.Fields("Data")) %></div></td>
</tr>
</table></td>
</tr>
<tr>
<td><div align="center">
<p><% Response.Write(Novetats.Fields("Novetat")) %></p>
<p> </p>
<table width="30%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><strong>Comentaris (5) </strong></div></td>
</tr>
</table>
</div></td>
</tr>
</table></td>
</tr>
<% Else %>
<tr>
<td><table width="560" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#000000" bgcolor="#FFFF99">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="56%"><% Response.Write(Novetats.Fields("Titol")) %></td>
<td width="44%"><div align="right">
<% Response.Write(Novetats.Fields("Data")) %>
</div></td>
</tr>
</table></td>
</tr>
<tr>
<td><div align="center">
<p>
<% Response.Write(Novetats.Fields("Novetat")) %>
</p>
<p> </p>
<table width="30%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><strong>Comentaris (5) </strong></div></td>
</tr>
</table>
</div></td>
</tr>
</table></td>
</tr>
<% End If %>
</table>
<%
Novetats.Close();
%>
</body>
</html>