Behöver lite help .. hoppas ni kan komma med några fina tips :)
Jag har en gästbok som har flera hundra inlägg, så det blir lite osmidigt att sitta och scrolla ner till de första inläggen. Hur gör jag för att tex. visa 20st åt gången och lägga de andra på sida 1,2,3 osv?
Här e koden -->
<!-- GÄSTBOK -->
<%
Case "gastbok"
%>
<div id="divUp" div style="position: absolute; top: 142px; left: 350px;">
<a href="#" onmouseover="scroll(-2)" onmouseout="noScroll()" onclick="return false"><img src="img/arrow_up.gif" border="0"></a>
</div>
<div id="divDown" div style="position: absolute; top: 160px; left: 350px;">
<a href="#" onmouseover="scroll(2)" onmouseout="noScroll()" onclick="return false"><img src="img/arrow_down.gif" border="0"></a>
</div>
<div id="divUp" div style="position: absolute; top: 135px; left: 380px;">
<a href="page.asp?action=signera"><b>- signera gästboken</b></a>
</div>
<div id="divScrollTextCont" div style="position: absolute; top: 130px; left: 18px;">
<div id="divText">
<%
sql = "SELECT * FROM gastbok ORDER BY inlagg_id DESC;"
set rs = Conn.Execute(sql)
%>
<br>
<table border="0" width="260" heigth="398">
<tr>
<td align="left">
<%
do until rs.eof
%>
<% If Not rs("namn") = "" Then %>
<b>Namn: </b><% =rs("namn")%><br>
<% End If %>
<% If Not rs("email") = "" Then %>
<b>Email:</b> <a href="mailto:<% =rs("email")%>"><% =rs("email")%></a><br>
<% End If %>
<% If Not rs("datum") = "" Then
tid = rs("datum")
strText = tid
strLeftChars = Left(strText,16)
%>
<b>Datum:</b> <%=strLeftChars%><br><br>
<%
End If
%>
<b>Inlägg:</b><br><% =rs("inlagg")%><br>
<img src="img/black_dot.gif" width="230" height="1">
<br>
<br>
<%
rs.movenext
loop
%>
</td>
</tr>
</table>
</div>
</div>
Tacksam för svar .. Mvh Magnus