Jag har en sida där jag ska lista en massa skämt från en databas...
I databasen ligger det över 2000 skämt så därför skall det göras en paging på den sidan...
Alt funkar om man lägger listningen med en lopp i en tabell på en kolumn....
Men när jag vill lägga till så att historierna kommer två på varje rad kärvar det ihop sig....
Den koden jag har testat med ser ut så här:
Do while y < rsAllJokes.PageSize AND NOT rsAllJokes.EOF%>
<tr><td class=LitenBrodText><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%><br> </td></tr>
<%rsAllJokes.MoveNext
If rsAllJokes.EOF Then%>
<tr><td> </td></tr>
<%else%>
<tr><td class=LitenBrodText><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%><br> </td></tr>
<%End if
y=y+1
rsAllJokes.MoveNext
Loop
Felmeddelandet jag får är:
Error Type:
ADODB.Recordset (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/bite-it/bite-it/sweden/tower/jokes.asp, line 63
Rad 63 är den sista movenexten innan loopen...
Snälla...
Jag har kört fast....
Finns det någon som kan hjälpa mig?
------------------ Du lever bara en gång och den gången är nu!
[red]<%
y=0
Do while y < rsAllJokes.PageSize
if rsAllJokes.EOF Then exit do
if y mod 2 = 0 then %>
<tr><td class=LitenBrodText><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%></td>
<% else %>
<td class=LitenBrodText><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%></td></tr>
<% end if
y=y+1
rsAllJokes.MoveNext
Loop
if y mod 2 <> 0 then Response.Write "</tr>"
%>[/red]
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>
Den loopen jag visade förut fungerar om man tar bort den rsAllJokes.moveNext som ligger precis innan if-satsen, men då får jag ju samma historia en gång till...
Jag måste väl kunna flytta markören på recordsetet utan att vända loppen eller??? Jag vet att jag har gjort något liknande förut, men kan inte komma på vart!
Nu virrar jag till det i min lilla hjärna... Får nog akta mig så det inte blir härdsmälta...
*suck*
------------------ Du lever bara en gång och den gången är nu!
lina, förstår dock inte hur din kod får två på samma rad, eftersom de ligger i olika tabellrader, men det kanske bara var jag som missuppfattade grundproblemet?
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>
Koden jag hade som funkar nu till slut ser ut så här:
Do while y < rsAllJokes.PageSize AND NOT rsAllJokes.EOF%>
<tr><td class=LitenBrodText valign=top><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%><br> </td>
<%rsAllJokes.MoveNext
If rsAllJokes.EOF Then%>
<td> </td></tr>
<%else%>
<td class=LitenBrodText valign=top><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%><br> </td></tr>
<%
rsAllJokes.MoveNext
End if
y=y+1
Loop
Men det bästa med det här är ju att nu kan jag välja ju...
:e
------------------ Du lever bara en gång och den gången är nu!
man skall undvika onödiga .movenext för att de oftast bara skapar problem. det är svårt att hålla koll på vad koden gör, krångligt att hänga med i svängarna.
värre än så är det inte.
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>
På din första och din tredje if-sats var jag tvungen att lägga till end if direkt efter...
y=0
Do while y < rsAllJokes.PageSize
if rsAllJokes.EOF Then exit do end if
if y mod 2 = 0 then %>
<tr><td class=LitenBrodText valign=top><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%></td>
<% else %>
<td class=LitenBrodText valign=top><b><%=rsAllJokes("JokeContent")%></b><br>
Insänd av: <%=rsAllJokes("JokeOwnerNickName")%></td></tr>
<% end if
y=y+1
rsAllJokes.MoveNext
Loop
if y mod 2 <> 0 then Response.Write "</tr>" end if
Fick expected end of statement....
Men nu funkar det...
Tackar så mycket för hjäplen...
------------------ Du lever bara en gång och den gången är nu!
@nders: Jag håller helt och håller med dig. Enligt alla konstens regler ska du inte behöva end if om den ligger på samma rad ju, men tydligen behövdes det för min dator vägrade visa det om jag inte satte dit dom....
:h
------------------ Du lever bara en gång och den gången är nu!
