webForumDet fria alternativet

nästa i paging

ASP

16 svar · 376 visningar · startad av WebbisNet

Medlem sedan feb. 20032 027 inlägg
Frågan#1

Hur skriver jag detta rätt så att nästa inte blir en länk när man är på sista sidan?

function getNextLink( intPageId, intPageCount )
  if not cint( intPageId ) < cint( intPageCount ) then
    getNextLink = " <a href='?pageid=" & intPageId + 1 & "'> Nästa &gt;&gt;</a> "
        else
  if cint( intPageId ) = cint( intPageCount ) then
    getNextLink = " Nästa &gt;&gt;</a> "
   end if
  end if
end function
Medlem sedan nov. 20017 144 inlägg
#2

Så här kanske:

function getNextLink( intPageId, intPageCount )
  if cint( intPageId ) > cint( intPageCount ) then
    getNextLink = " <a href='?pageid=" & intPageId + 1 & "'> Nästa »</a> "
        else
    getNextLink = " Nästa »"
  end if
end function
Medlem sedan feb. 20032 027 inlägg
#3

Jesper T skrev:

Så här kanske:

function getNextLink( intPageId, intPageCount )
  if cint( intPageId ) > cint( intPageCount ) then
    getNextLink = " <a href='?pageid=" & intPageId + 1 & "'> Nästa »</a> "
        else
    getNextLink = " Nästa »"
  end if
end function

Den tar mig bara till första sidan

Medlem sedan mars 20015 287 inlägg
Medlem sedan feb. 20032 027 inlägg
#5

solbulle skrev:

http://www.webforum.nu/showthread.php?s=&postid=699282#post699282 ?

Länken funkar i vanliga fall, innan jag testade förslaget jag fick....men jag vill att när man är på sista sidan så ska bara nästa skrivas ut som text, inte som länk

har man bara 8 sidor ska man inte kunna komma till en tom 9-e

Medlem sedan mars 20015 287 inlägg
#6

Okelidoki, men då tycker jag Jespers förslag ska lira. Vad menar du med att man bara kommer till första sidan?

Medlem sedan feb. 20032 027 inlägg
#7

solbulle skrev:

Okelidoki, men då tycker jag Jespers förslag ska lira. Vad menar du med att man bara kommer till första sidan?

Hade glömt en liten detalj i hans kod, men problemet återstår, man kan fortfarande klicka på nästa även efter sista sidan

Medlem sedan mars 20015 287 inlägg
#8

Kan du visa hela koden?

Medlem sedan feb. 20032 027 inlägg
#9

solbulle skrev:

Kan du visa hela koden?

Set objRs = Server.Createobject("Adodb.Recordset")
strSQL = "SELECT mailRead, username, screenname, mailDate, mailTime, sender, Headline, message, mailID,Reciever "&_
"FROM tblUsers INNER JOIN tblUsers_imail ON tblUsers.userID = tblUsers_imail.sender "&_
"WHERE Reciever=" & Session("userID")&" order by mailID desc"
strConString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "& server.MapPath("/db/Inloggning.mdb") & ";"

'================================================================================================
function getPreviousLink( intp )
  if intp > 1 then
    getPreviousLink = " <a class=""menu"" href='?p=" & intp - 1 & "'>&lt;&lt; Föregående</a> "
    else
        If intp < 2 then
              response.write "&lt;&lt; Föregående"
        end if  
  end if
end function
'================================================================================================

'================================================================================================
function getNextLink( intPageId, intPageCount )
  if cint( intp ) > cint( intPageCount ) then
    getNextLink = " <a href='?p=" & intp + 1 & "'> Nästa »</a> "
        else
    getNextLink = " Nästa »"
  end if
end function
'================================================================================================

'================================================================================================
function getLastLink( intPageCount )
  getLastLink = " <a class=""menu"" href='?p=" & intPageCount & "'>Sista sidan</a> "
end function
'================================================================================================

'================================================================================================
function getPageInfo( intp, intPageCount )
  getPageInfo = " Antal sidor: " & intPageCount & ", nuvarande sida: " & intp & " "
end function
'================================================================================================

intp = request.querystring( "p" )
if intp = "" then intp = 1

with objRs
  .cursorlocation = 3
  .open strSQL, strConString
  .pagesize = 6
  .absolutepage = intp
end with

intPages = cint( objRs.pagecount )
intCurrentPost = 0

do while not objRs.eof and intCurrentPost < objRs.pagesize
  strContents = strContents &_
Medlem sedan mars 20015 287 inlägg
#10

Där har du skrivit fel i din funktion:

function getNextLink( intPageId, intPageCount )
  if cint( intpageId ) > cint( intPageCount ) then
    getNextLink = " <a href='?p=" & intp + 1 & "'> Nästa »</a> "
        else
    getNextLink = " Nästa »"
  end if
end function
Medlem sedan feb. 20032 027 inlägg
#11

solbulle skrev:

Där har du skrivit fel i din funktion:

function getNextLink( intPageId, intPageCount )
  if cint( intpageId ) > cint( intPageCount ) then
    getNextLink = " <a href='?p=" & intp + 1 & "'> Nästa »</a> "
        else
    getNextLink = " Nästa »"
  end if
end function

Nu använder jajg
function getNextLink( intPageId, intPageCount )
if cint( intpageId ) > cint( intPageCount ) then
getNextLink = " <a href='?p=" & intp + 1 & "'> Nästa »</a> "
else
getNextLink = " Nästa »"
end if
end function

och jag kan fortfarande klicka mig efter sista sidan

Medlem sedan mars 20015 287 inlägg
#12

Ah, sorry, missade ännu en grej i funktionen.

function getNextLink( intPageId, intPageCount )
if cint( intpageId ) < cint( intPageCount ) then
getNextLink = " <a href='?p=" & intPageId + 1 & "'> Nästa »</a> "
else
getNextLink = " Nästa »"
end if
end function

red./ Hur kallar du på den rackarn egentligen?

Medlem sedan feb. 20032 027 inlägg
#13

solbulle skrev:

Ah, sorry, missade ännu en grej i funktionen.

function getNextLink( intPageId, intPageCount )
if cint( intpageId ) < cint( intPageCount ) then
getNextLink = " <a href='?p=" & intPageId + 1 & "'> Nästa »</a> "
else
getNextLink = " Nästa »"
end if
end function

red./ Hur kallar du på den rackarn egentligen?

med <%=getNextLink( intp, intPageCount )%>

Medlem sedan mars 20015 287 inlägg
#14

<%=getNextLink( intp, intPages )%>

Medlem sedan feb. 20032 027 inlägg
#15

solbulle skrev:

<%=getNextLink( intp, intPages )%>

Nu visas inte nästa som länk på någon av sidorna :-D

Medlem sedan mars 20015 287 inlägg
#16

Blir man tokig eller...

Medlem sedan feb. 20032 027 inlägg
#17

solbulle skrev:

Blir man tokig eller...

Blir väldiigt glad om vi får det här löst :-)

263 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
121 ms — deklarationer (db)
0 ms — hämta statistik (cache)
137 ms — hämta tråd, inlägg och bilagor (db)
123 ms — ändringar (db)