최근에 웹 사이트가 개정되었으며 원래 페이지에 숫자가 포함되어 있지 않으며 홈페이지, 마지막 페이지, 다음 페이지 및 Select Jump가 모두 인기가 있지만 이제 가장 인기있는 것은 숫자 페이지가 중간에 있다는 것입니다. 필요한 친구는 그것을 참조 할 수 있습니다.
효과:
외국 핵심 코드 :
코드 사본은 다음과 같습니다.
<%
'ASP의 Digg Style Pagination Script .. Moazam에 의해 작성되었습니다 ... http://www.moazam.com/2007/03/30/asp-digg-style-pagination-script/
함수 getPaginationString (페이지, TotalItems, 제한, 인접, TargetPage)
'기본값
isnumeric (인접)이 아닌 경우 인접한 = 1 종료 if
isnumeric (한계)이 아닌 경우 한계 = 15 종료 if
isnumeric (페이지)이 아닌 경우 Page = 1 END IF
If TargetPage = ""인 경우 TargetPage = "/"END IF
마진 = ""
패딩 = ""
'기타 vars
prev = page -1'previous page is page -1
NextPage = page + 1'NextPage 페이지는 페이지 + 1입니다.
LastPage = CEIL (Totalitems, Limit) 'LastPage는 페이지 당 총 항목 / 항목, 반올림됩니다.
lpm1 = lastpage -1'last 페이지 마이너스 1
'이제 우리는 규칙을 적용하고 Pagination Object를 그립니다.
'우리는 실제로 코드를 두 번 이상 그릴 경우 코드를 변수에 저장하고 있습니다.
Pagination = ""
마지막 페이지> 1이면
Pagination = Pagination & "<divpagination" "" "
margin <> ""또는 Padding <> ""인 경우
Pagination = Pagination & "Style =" "" ""
마진 <> ""라면
Pagination = Pagination & "margin : margin"
끝 If
패딩 <> ""라면
Pagination = Pagination & "Padding : Padding"
끝 If
Pagination = Pagination & "" "" "
끝 If
Pagination = Pagination & ">"
'이전 버튼
Page> 1 인 경우
Pagination = Pagination & "<a href =" ""& targetPage & "& page ="& prev & "" "> prev </a>"
또 다른
Pagination = Pagination & "<spandisabled" "> prev </span>"
끝 If
'페이지
Lastpage <7 + (인접 * 2) 인 경우 두 페이지를 분해하기에 충분한 페이지가 없습니다.
카운터 = 1에 대한 최후의 경우
카운터 = 페이지 인 경우