Ho creato questo script che fino a ieri andava. Ora invece di inserirmi le ultime 6 modelle aggiornate me ne inserisce 7 nonostante nella stringa sql = "SELECT top 6 * FROM modelle ORDER BY dataModifica desc" sia impostato il valore 6. Come mai tutto ciò? Poi un'altra cosa stranissima: se io apro il file principele e cioè www.agenziaprofessionespettacolo.it/chi_siamo.htm con frontpage, lui mi visualizza tutto correttamente però internete explorer no. Come mai? E se per cortesia qualcuno mi dice se visualizza il tutto correttamente o dopo la sesta modella visualizza una parte della settima. Grazie
<html>
<head>
<link rel="stylesheet" href="http://www.agenziaprofessionespettacolo.it/link.css" type="text/css">
<title>.:: Modelle ::.</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000" topmargin="0" leftmargin="0">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="5%" id="AutoNumber1" height="388" background="http://www.agenziaprofessionespettacolo.it/images/sfondo_menu.jpg">
<tr>
<td width="100%" height="388" background="http://www.agenziaprofessionespettacolo.it/images/sfondo_menu.jpg"><center>
<TABLE border="1" width="140" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0" cellspacing="0" height="109">
<TR bgcolor="#000000">
<TD width="741" height="23" colspan="2" bgcolor="#0B62C1">
<p align="center">
<span style="font-size: 8pt">Gli Ultimi aggiornamenti</span></TD>
</TR>
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/fpdb/casting1.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT top 6 * FROM modelle ORDER BY dataModifica desc"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
urlScheda="http://www.agenziaprofessionespettacolo.it/"
urlFoto="http://www.agenziaprofessionespettacolo.it/immaginette/"
do while not(rs.eof)
if intVolta="1" then
intVolta="0"
intTesto="#000000"
intSfondo="#4699f4"
else
intVolta="1"
intTesto="#000000"
intSfondo="#93c4f9"
end if
%>
<TR bgcolor="<%=intSfondo%>">
<TD width="453" height="27" align="left"><p align="center">
<p align="center">
<a href="#" onClick="window.open('<%=urlScheda%><%=rs(4)%>','p opup','resizable=yes,width=740,height=550');">
[img]<%=urlFoto%><%=rs(7)%>[/img]</a> </p>
<p align="center">[B]<font color="#000000" style="font-size: 8pt">
<span style="text-transform: uppercase"><%=rs(1)%></span>
<%=rs(2)%></font></p>
</p></TD>
</TR>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
<TR>
<TD width="741" height="22" align="left" colspan="2" bgcolor="#0B62C1">
<p align="center">
<span style="font-size: 9pt">
<a target="_top" href="http://www.agenziaprofessionespettacolo.it/modelle.htm">
Cerca una Modella</a></span></TD>
</TR>
</TABLE>
</center></td>
</tr>
</table>
</body>
</html>
Rispondi quotando
