03. august 2003 - 16:37Der er
6 kommentarer og 1 løsning
Næste side funktion virker ikke
Hej... nu er jeg simpelthen for træt i hovdet til at kunne finde ud af det her..:!!! Do id = rs("id") session("talt") = session("talt") + 1 if request("row") < session("talt") and request("row") + 15 > session("talt") Then %> <tr> <td width="22%" background="menubaggrund.jpg"><a href="default.asp?mode=spg&id=<%=id%>"><%=rs("titel")%></a></td> <td width="6%" background="menubaggrund.jpg"><a href="default.asp?mode=brugerinfo&navn=<%=rs("bruger")%>"><%=rs("bruger")%></a></td>
<td width="5%" background="menubaggrund.jpg"> <% if session("rang") = "Admin" Then %> <a href="default.asp?mode=luktraad&id=<%=id%>"><img src="luk.jpg" border="0"></a> Luk<% end if %> </td>
Til at starte på kommer der godt nok 15 poster, men trykker jeg næste kommer der ingen ting trods der er rigeligt med poster... og opdaterer jeg kommer der heller ingen ting:(?
<!--#include file="mainbase.asp"--> <% sql = "select * from spg order by ID desc;" set rs = conn.execute(sql) if not rs.bof Then Do id = rs("id") session("talt") = session("talt") + 1 if Int(request("row")) < Int(session("talt")) and Int(request("row") + 15) > Int(session("talt")) Then %> <tr> <td width="22%" background="menubaggrund.jpg"><a href="default.asp?mode=spg&id=<%=id%>"><%=rs("titel")%></a></td> <td width="6%" background="menubaggrund.jpg"><a href="default.asp?mode=brugerinfo&navn=<%=rs("bruger")%>"><%=rs("bruger")%></a></td>
<td width="5%" background="menubaggrund.jpg"> <% if session("rang") = "Admin" Then %> <a href="default.asp?mode=luktraad&id=<%=id%>"><img src="luk.jpg" border="0"></a> Luk<% end if %> </td>
</tr>
<% end if
rs.movenext Loop While Not rs.EOF end if response.write "<a href=default.asp?mode=oversigt&row=" & request("row") + 15 & ">Næste></a>" conn.close set conn = nothing
<!--#include file="mainbase.asp"--> <% set rs = Server.CreateObject("ADODB.Connection") intPage = Request("page") If isNumeric(intPage) = False Or intPage < 1 Then intPage = 1 End If
sql = "select * from spg order by ID desc;" rs.Open sql, conn, 1 if not rs.bof Then rs.PageSize = 10 rs.AbsolutePage = intPage intRecCount = rs.PageSize intPageCount = rs.PageCount Do While Not rs.EOF And intRecCount > 0 id = rs("id") session("talt") = session("talt") + 1 %> <tr> <td width="22%" background="menubaggrund.jpg"><a href="default.asp?mode=spg&id=<%=id%>"><%=rs("titel")%></a></td> <td width="6%" background="menubaggrund.jpg"><a href="default.asp?mode=brugerinfo&navn=<%=rs("bruger")%>"><%=rs("bruger")%></a></td>
<td width="5%" background="menubaggrund.jpg"> <% if session("rang") = "Admin" Then %> <a href="default.asp?mode=luktraad&id=<%=id%>"><img src="luk.jpg" border="0"></a>Luk <% end if %> </td> </tr> <% intRecCount = intRecCount - 1 rs.movenext Loop end if
If Clng(intPage) > 1 Then Response.Write "<a href=default.asp?mode=oversigt&page=" & intPage - 1 & ">Forrige</a>" Else Response.Write "Forrige" End If
Response.Write " "
If Clng(intPage) < Clng(intPageCount) Then Response.Write "<a href=default.asp?mode=oversigt&page=" & intPage + 1 & ">Næste</a> " Else Response.Write "Næste" End If
oki mange tak:) hvade faktisk lige fået det til at virke sådan :
<!--#include file="mainbase.asp"--> <% sql = "select * from spg order by ID desc;" set rs = conn.execute(sql) if not rs.bof Then Do id = rs("id") talt = talt + 1 if Int(request("row")) < Int(talt) and Int(request("row") + 15) > Int(talt) Then %> <tr> <td width="22%" background="menubaggrund.jpg"><a href="default.asp?mode=spg&id=<%=id%>"><%=rs("titel")%></a></td> <td width="6%" background="menubaggrund.jpg"><a href="default.asp?mode=brugerinfo&navn=<%=rs("bruger")%>"><%=rs("bruger")%></a></td>
<td width="5%" background="menubaggrund.jpg"> <% if session("rang") = "Admin" Then %> <a href="default.asp?mode=luktraad&id=<%=id%>"><img src="luk.jpg" border="0"></a> Luk<% end if %> </td>
</tr>
<% end if
rs.movenext Loop While Not rs.EOF end if response.write "<a href=default.asp?mode=oversigt&row=" & request("row") + 15 & ">Næste></a>" conn.close set conn = nothing
:D tak for hjælpen
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.