Joabers Postado Abril 19, 2004 Denunciar Share Postado Abril 19, 2004 alguém me ajuda a corrigir este erro...Quero que funcione a paginaçao por localidade - estado e produtodesta forma só estado funciona<%if Not iResultCount = 0 thenDim w2, pad, k2, ref, scriptname, isPrev, isNext, isEnd, counterDim nextpage, prevpage, intPageDisp, counterstart, counterend, pagesize2, againpad=""scriptname=request.servervariables("script_name")if iResultCount <> "0" Then response.write "<font size='2' color='black' face='Verdana, Arial,Helvetica, sans-serif'> Resultado das Páginas: "elseend if if (mypage mod 10) = 0 then counterstart = mypage - 9 else counterstart = mypage - (mypage mod 10) + 1 end if counterend = counterstart + 9 if counterend > maxpages then counterend = maxpages Response.Write open for counter=counterstart to counterend If counter>=10 then pad="" end if if cstr(counter) <> mypage then ref="<a href='" & scriptname ref=ref & "?whichpage=" & counter & "&pagesize=" & mypagesize ref=ref & "&Estado=" & Estado& "'>" & pad & counter & "</a>" else ref="<b>" & pad & counter & "</b>" end if response.write ref if counter <> counterend then response.write " " next Response.Write close' Find out if there should be Backward or Forward Buttons on the table.intPageDisp = Falseif mypage = 1 AND RS.recordcount = 9 then isPrev = False isNext = False isEnd = Trueelseif mypage = 1 then isPrev = False isNext = True isEnd = Falseelseif mypage > 1 AND ok = RS.recordcount then isPrev = True isNext = False isEnd = Trueelse isPrev = True isNext = True isEnd = FalseEnd Ifif RS.recordcount <= 10 thenisNext = Falseelsenextpage = mypage + 1prevpage = mypage - 1end ifIf isPrev = False AND isNext = True AND isEnd = False thenw2 = " <strong><a HREF=" & scriptname & "?whichpage=" & nextpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[Próxima >]</font></a></strong>"k2 = ""End Ifif isPrev = True AND isNext = True AND isEnd = False thenw2 = " <strong><a HREF=" & scriptname & "?whichpage=" & prevpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[< Anterior]</font></a></strong>"k2 = " <strong><a HREF=" & scriptname & "?whichpage=" & nextpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[Próxima >]</font></a></strong>"end ifif isPrev = True AND isNext = False AND isEnd = True thenw2 = " <strong><a HREF=" & scriptname & "?whichpage=" & prevpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[< Anterior]</font></a></strong>"k2 = ""end ifif isPrev = False AND isNext = False AND isEnd = true thenw2 = ""k2 = ""end ifresponse.write w2 & k2response.write "" & again%><% elseresponse.write "<center><br>Desculpa nenhuma ocorrência encontrada.</center>"end ifRS.closeset RS=nothing%> Link para o comentário Compartilhar em outros sites More sharing options...
0 Victor Postado Abril 19, 2004 Denunciar Share Postado Abril 19, 2004 Não entendi muito bem essa dúvida... Podia ser mais claro?? []'sVictor Link para o comentário Compartilhar em outros sites More sharing options...
0 Joabers Postado Abril 19, 2004 Autor Denunciar Share Postado Abril 19, 2004 Eu fiz uma busca no banco de dados e funciona beleza.. mas quando tem paginação ocorre que a primeira pagina ele busca certo.. mas na segunda ele só busca pelo estado não vai a localide de produto...quer dizer que ele muda a partir da segunda porque eu só coloquei para estado...Eu preciso que ele continue paginando corretamente... If isPrev = False AND isNext = True AND isEnd = False thenw2 = " <strong><a HREF=" & scriptname & "?whichpage=" & nextpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[Próxima >]</font></a></strong>"k2 = ""End Ifif isPrev = True AND isNext = True AND isEnd = False thenw2 = " <strong><a HREF=" & scriptname & "?whichpage=" & prevpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[< Anterior]</font></a></strong>"k2 = " <strong><a HREF=" & scriptname & "?whichpage=" & nextpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[Próxima >]</font></a></strong>"end ifif isPrev = True AND isNext = False AND isEnd = True thenw2 = " <strong><a HREF=" & scriptname & "?whichpage=" & prevpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[< Anterior]</font></a></strong>" Link para o comentário Compartilhar em outros sites More sharing options...
0 Joabers Postado Abril 19, 2004 Autor Denunciar Share Postado Abril 19, 2004 Será que ninguém pode me ajudar nisso...Este codigo determina que tenha o link...if cstr(counter) <> mypage then ref="<a href='" & scriptname ref=ref & "?whichpage=" & counter & "&pagesize=" & mypagesize ref=ref & "&Estado=" & Estado& "'>" & pad & counter & "</a>" else ref="<b>" & pad & counter & "</b>" end if response.write ref if counter <> counterend then response.write " "Beleza mais quando aperece pagina dois e eu clico ele não corresponde ao que eu quero..Exemplo: se eu localizar uma cidade no estado do rio ele acha mais na proxima pagina ele vai buscar todas as cidades no estado do rio...porque eru não sei como acresecentar localidade tb na paginação... Link para o comentário Compartilhar em outros sites More sharing options...
0 Joabers Postado Abril 19, 2004 Autor Denunciar Share Postado Abril 19, 2004 SOSAlguém ve esse codigo... Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Abril 19, 2004 Denunciar Share Postado Abril 19, 2004 tá..mas você esta passando no link a variavel ESTADO, certo?os dados dessa variavel estao ok?ta tudo certinho com ela?pois pode ser que ela não tenha os valores corretos..e por isso não funcionacerto? Link para o comentário Compartilhar em outros sites More sharing options...
0 Joabers Postado Abril 19, 2004 Autor Denunciar Share Postado Abril 19, 2004 mas eu não posso colocar mais de um campo no link...acrescentar depois de estado localidade? Link para o comentário Compartilhar em outros sites More sharing options...
0 Joabers Postado Abril 19, 2004 Autor Denunciar Share Postado Abril 19, 2004 Valeu pela força eu já consegui fazer... Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Abril 19, 2004 Denunciar Share Postado Abril 19, 2004 conseguiu?mas eu não posso colocar mais de um campo no link...você pode.. coloque com o simbolo &mas se conseguiu melhort+ Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Joabers
alguém me ajuda a corrigir este erro...
Quero que funcione a paginaçao por localidade - estado e produto
desta forma só estado funciona
<%
if Not iResultCount = 0 then
Dim w2, pad, k2, ref, scriptname, isPrev, isNext, isEnd, counter
Dim nextpage, prevpage, intPageDisp, counterstart, counterend, pagesize2, again
pad=""
scriptname=request.servervariables("script_name")
if iResultCount <> "0" Then
response.write "<font size='2' color='black' face='Verdana, Arial,Helvetica, sans-serif'> Resultado das Páginas: "
else
end if
if (mypage mod 10) = 0 then
counterstart = mypage - 9
else
counterstart = mypage - (mypage mod 10) + 1
end if
counterend = counterstart + 9
if counterend > maxpages then counterend = maxpages
Response.Write open
for counter=counterstart to counterend
If counter>=10 then
pad=""
end if
if cstr(counter) <> mypage then
ref="<a href='" & scriptname
ref=ref & "?whichpage=" & counter & "&pagesize=" & mypagesize
ref=ref & "&Estado=" & Estado& "'>" & pad & counter & "</a>"
else
ref="<b>" & pad & counter & "</b>"
end if
response.write ref
if counter <> counterend then response.write " "
next
Response.Write close
' Find out if there should be Backward or Forward Buttons on the table.
intPageDisp = False
if mypage = 1 AND RS.recordcount = 9 then
isPrev = False
isNext = False
isEnd = True
elseif mypage = 1 then
isPrev = False
isNext = True
isEnd = False
elseif mypage > 1 AND ok = RS.recordcount then
isPrev = True
isNext = False
isEnd = True
else
isPrev = True
isNext = True
isEnd = False
End If
if RS.recordcount <= 10 then
isNext = False
else
nextpage = mypage + 1
prevpage = mypage - 1
end if
If isPrev = False AND isNext = True AND isEnd = False then
w2 = " <strong><a HREF=" & scriptname & "?whichpage=" & nextpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[Próxima >]</font></a></strong>"
k2 = ""
End If
if isPrev = True AND isNext = True AND isEnd = False then
w2 = " <strong><a HREF=" & scriptname & "?whichpage=" & prevpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[< Anterior]</font></a></strong>"
k2 = " <strong><a HREF=" & scriptname & "?whichpage=" & nextpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[Próxima >]</font></a></strong>"
end if
if isPrev = True AND isNext = False AND isEnd = True then
w2 = " <strong><a HREF=" & scriptname & "?whichpage=" & prevpage & "&pagesize=" & mypagesize & "&Estado=" & Estado& "><font face=Arial size=2>[< Anterior]</font></a></strong>"
k2 = ""
end if
if isPrev = False AND isNext = False AND isEnd = true then
w2 = ""
k2 = ""
end if
response.write w2 & k2
response.write "" & again
%>
<% else
response.write "<center><br>Desculpa nenhuma ocorrência encontrada.</center>"
end if
RS.close
set RS=nothing
%>
Link para o comentário
Compartilhar em outros sites
8 respostass a esta questão
Posts Recomendados