For mange posts. Lave sider?
I mit administrationssystem har jeg en liste der viser de posts jeg nu har oprettet, men da denne liste efterhånden bliver større og større, kan jeg godt se at jeg snart får et problem.Er der ikke en måde hvorpå jeg kan lave det sådan at den laver en link til en side 2 hvis post overstiger f.eks. 20?
Jeg har tænkt på noget med at lave en string der hedder page=1.
Dernæst vil jeg så skrive:
<%
strPage = Request.QueryString("page")
strSide = (rs / strPage)
If strSide > 20 Then
lav et link
Else
Response.Write ""
End If
rs skal være de antal posts der er lavet men tror bare at det er forkert. Jeg tror også at:
strPage = Request.QueryString("page")
strSide = (rs / strPage)
If strSide > 20 Then
er helt hen i vejret, men jeg har intet andet bud på hvordan det ellers skulle være.
Som lidt information er Rediger.asp tilføjet.
<%
strType = Request.QueryString("type")
strMenu = Request.QueryString("menu")
strSQL = "SELECT * from Site where Type = '" & strType & "' order by id desc"
set rs = Conn.Execute(strSQL)
If rs.EOF Then
Response.Write "<div align='center'><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'>Ingen er oprettet</font></div>"
Elseif strType = "anmeldelse" Then
Do
Response.Write "<tr><td><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'><a href='film.asp?menu=" & strMenu & "&type=" & strType & "&edit=" & rs("id") & "'>" & rs("overskrift") & "</font></td><td width='10%'><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'><div align='right'>" & rs("dato") & "</div></font></td><td><a onclick='return confirm('Er du sikker ?');' href='slet.asp?id=" & rs("id") & "&menu=" & strMenu & "&type=" & strType & "'> Slet </a></td></tr>"
rs.Movenext
Loop while Not rs.EOF
Else
Do
Response.Write "<tr><td><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'><a href='opret.asp?menu=" & strMenu & "&type=" & strType & "&edit=" & rs("id") & "'>" & rs("overskrift") & "</font></td><td width='10%'><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'><div align='right'>" & rs("dato") & "</div></font></td><td><a onclick='return confirm('Er du sikker ?');' href='slet.asp?id=" & rs("id") & "&menu=" & strMenu & "&type=" & strType & "'> Slet </a></td></tr>"
