Salve vorrei farsi che un ciclo asp che genera 50 record abbia lo scorrimento della barra in modo da non avere una pagina web troppo lunga...
Ho provato cosî:
<div id="BARRA">
<p align="center">
<%
sqlString = "SELECT * FROM commenti WHERE idfoto=" & strRic
Set RS = Server.CreateObject( "ADODB.Recordset" )
RS.ActiveConnection = Con
RS.Open sqlString
%>
<%
Repeat=1
Do Until rs.EOF
%>
<%
While ((Repeat <> 0) AND (NOT Rs.EOF))
%>
<table border="0" width="40%" id="table1" style="border-top-style: solid; border-bottom-style: solid; " height="38">
<tr>
<td height="68" align="left" bordercolor="#000080" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px" rowspan="2">
<font face="Verdana" size="1">
<%= rs.fields("data")%> <%= rs.fields("ora")%> </font>
<font face="Verdana" size="1">
<%
testo=rs.fields("commento") & ""
testo=replace(testo,"@1","<img src=biggrin.gif>")
testo=replace(testo,"@2","<img src=frown.gif>")
testo=replace(testo,"@3","<img src=ciapet.gif>")
testo=replace(testo,"@4","<img src=metallica.gif>")
response.write testo
%></font></td>
</tr>
<tr>
<%
Repeat=Repeat -1
Rs.MoveNext()
Wend
%>
</tr>
<%
Repeat=1
Loop
%>
</p>
</div>
e il css
#BARRA
{
overflow: Auto;
background-color: #EEEEEE;
color: #000000;
font: Normal 12px Verdana;
width: 150px;
height: 200px;
margin: 0px;
padding: 5px;
border: Solid 1px #000000;
scrollbar-base-color: #000000;
scrollbar-arrow-color: #CCCCCC;
scrollbar-track-color: #CCCCCC;
}
ma non mi da nessuna barra....![]()

Rispondi quotando
