Fortsættelse af spørgsmål om paging

Du kan prøve noget som dette, med udgangspunkt i samme eks:


visAntal = 10
intStart = intPage - visAntal
intSlut  = intPage + visAntal
if intStart <= 0 then intStart = 1
if intSlut > intPageCount then intSlut = intPageCount
For intNum = intStart To intSlut
  Response.Write "<a href=paging.asp?page=" & intNum & "><font face='arial' size='2'><b>" & intNum & "</b></font></a> "
Next

Du kan evt også se dette spm med et par eksempler på hvordan man kan vise det:
http://www.eksperten.dk/spm/349973

Enten er jeg dum eller også kan jeg ikke lige se sammenhængen og lige hvordan jeg sakl sætte det ind i mit eget script:

If iPageCurrent > 1 Then
    %>
    <% if request.querystring("lng") <> "" then %>
    <font color=red><a class="comlinkred" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent - 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[&lt;&lt; Prev]</a></font>
    <% else %>
    <font color=red><a class="comlinkred" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent - 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[&lt;&lt; Forrige]</a></font>
    <% end if %>
    <%
End If


For I = 1 To iPageCount
minID = iPageSize * (I-1)+1
maxID = iPageSize * I
if maxID > recordcounting then maxID = recordcounting

    If I = iPageCurrent Then
        %>
        <% Response.Write "<a class=""comlinkred""><b>[" & minID & "-" & maxID & "]</b></a> " %>
        <%
    Else
        %>
        <font color=red><a class="comlinkred" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= I %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[<%=minID%>-<%=maxID%>]</a></font>
        <%
    End If
Next

If iPageCurrent < iPageCount Then
    %>
    <% if request.querystring("lng") <> "" then %>
    <font color=red><a class="comlinkred" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent + 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[Next &gt;&gt;]</a></font>
    <% else %>
        <font color=red><a class="comlinkred" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent + 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[Næste &gt;&gt;]</a></font>
    <% end if %>
    <%
End If %>

Hvis det kan lade sig gøre???

arh det skal være en blanding af de to?

Men det er denne linje:

For I = 1 To iPageCount


Som skal rette til dette:

visAntal = 10
intStart = iPageCurrent - visAntal
intSlut  = iPageCurrent + visAntal
if intStart <= 0 then intStart = 1
if intSlut > iPageCount then intSlut = iPageCount
For intNum = intStart To intSlut

hmm og så lige intNum --> I  i den sidste linje:
For I = intStart To intSlut

Nu viser det godt nok kun et vist antal men den viser alle linksene som om de var den aktuelle side - dvs ingen links til andre sider alle ser ens ud [1-50]

Undskyld skulle lige have det sidste med...men den viser 11 istedet for 10 og vælger man den sidste vises 10 mere

og du fik den sidste retelse med?
Den variable du bruger hedder I, jeg har skrevet intNum i For sætningen.
den skal se sådan her ud:

For I = intStart To intSlut

oveni de andre 11

Ja den viser dem lige som google.dk gør +/-10 fra den valgte side.

eks på google:
http://www.google.dk/search?q=adf&hl=da&lr=&ie=UTF-8&oe=UTF-8&start=120&sa=N

Hvis den altid skal vise 10 ialt så skal disse:

visAntal = 10
intStart = iPageCurrent - visAntal
intSlut  = iPageCurrent + visAntal
if intStart <= 0 then intStart = 1
if intSlut > iPageCount then intSlut = iPageCount

Laves om til:

visAntal = 10
intStart = iPageCurrent - Int(visAntal/2)
if intStart <= 0 then intStart = 1
intSlut  = intStart + visAntal
if intSlut > iPageCount then intSlut = iPageCount

Det er bedre men den viser 11 og kan man få den til at vise den valgte først + de 9 andre

Den første, er det den side man er kommet til?

Det ser mærkeligt ud prøv at søge på følgende side:

http://mysterymanrecords.dk

Altså hvis man står vælger side 5 skal den vise 5,6,7,8,9,10,11,12,13,14,15 ?

For så skal det være:

visAntal = 10 'ret evt til 9 hvis den skal vise en mindre.
intSlut  = intStart + visAntal
if intSlut > iPageCount then intSlut = iPageCount
For I = iPageCurrent To intSlut

Jeg har ændret det men når den kommer over de 10 + 1 på næste side vises der ikke flere sider kun forrige og næste linksene

Prøv at vise hvor koden er lige nu, og et eks på hvordan det skal være er det som jeg spurgte om lige før?

jamen det er sådan som du skrev og her er koden
http://www.mysterymanrecords.dk/search1.asp?recors=50&mode=all&keyword=a&page=2&order=Kunstner&lng=&casa=CD%20-%20CD

ok, men den viser så alle siderne, hmm ser lige en fejl i det jeg har vist.

Denne:
intSlut  = intStart + visAntal

Skal være:
intSlut  = iPageCount + visAntal

Med den nye rettelse se det så

det forstår jeg ikke, men den starter det rigtigt sted..og variablen visAntal er stat til noget?

ja 9

If iPageCurrent > 1 Then
    %>
    <% if request.querystring("lng") <> "" then %>
    <font color=red><a class="comlinkred2" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent - 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[&lt;&lt; Prev]</a></font>
    <% else %>
    <font color=red><a class="comlinkred2" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent - 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[&lt;&lt; Forrige]</a></font>
    <% end if %>
    <%
End If

visAntal = 9 'ret evt til 9 hvis den skal vise en mindre.
intSlut  = iPageCount + visAntal
if intSlut > iPageCount then intSlut = iPageCount
For I = iPageCurrent To intSlut
minID = iPageSize * (I-1)+1
maxID = iPageSize * I
if maxID > recordcounting then maxID = recordcounting
    If I = iPageCurrent Then
        %>
        <% Response.Write "<a class=""comlinkred2""><b>[" & minID & "-" & maxID & "]</b></a> " %>
        <%
    Else
        %>
        <font color=red><a class="comlinkred2" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= I %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[<%=minID%>-<%=maxID%>]</a></font>
        <%
    End If
Next

If iPageCurrent < iPageCount Then
    %>
    <% if request.querystring("lng") <> "" then %>
    <font color=red><a class="comlinkred2" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent + 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[Next &gt;&gt;]</a></font>
    <% else %>
        <font color=red><a class="comlinkred2" href="search1.asp?recors=<%=iPageSize%>&mode=<%=request("mode")%>&keyword=<%=request("keyword")%>&page=<%= iPageCurrent + 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&lng=<%=request.querystring("lng")%>&casa=<%=request.querystring("casa")%>">[Næste &gt;&gt;]</a></font>
    <% end if %>
    <%
End If

I det sidste jeg viste har jeg vist pyttet rundt på iPageCount og iPageCurrent??
Prøv lige at rette:
intSlut  = iPageCount + visAntal

Til, for det er jo iPageCurrent som indeholder den valgte side:
intSlut  = iPageCurrent + visAntal

Det ser ud til at virke, men se det lige i linket ovenover

Ja nu ser det meget bedre ud

Lige ved at opgive, men det var godt du ikke gjorde det, send et svar

Ok :)

Jeg beklager jeg fik byttet rundt på et par variable :)

accepteret du klarede det til sidst