지난 이틀 동안 저는 자유시간을 이용하여 긴 글에 대한 페이지 매김과 페이지 번호 표시줄의 간단한 구현 방법을 프로그래밍하고 생각해 보았습니다.
아이디어는 VBSCRIPT입니다.
CurrentPage=Request.QueryString("페이지")
'CurrentPage는 현재 페이지를 의미합니다.
PageCount = Int(Len(Content)/SIZE) + 1
'콘텐츠는 긴 글 콘텐츠입니다.
'SIZE는 각 페이지에 표시되는 단어 수입니다.
'PageCount는 마지막 페이지의 페이지 번호입니다.
START=Cint((CurrentPage-1)*SIZE+1)
'START는 각 페이지의 시작 단어 수입니다.
START<1이면 START=1입니다.
콘텐츠=중간(콘텐츠,START,SIZE)
'위에는 각 페이지의 텍스트가 잘려져 있습니다
.' 아래에는 페이지 번호 표시줄이 있습니다. 환상적이지만 꽤 간단하고 실용적입니다. . . 일반 페이징에는 충분하다고 생각합니다.
'PAGEBAR_COUNT는 매번 표시되는 페이지 번호 수를 의미하는데, 2로 나누어서 반올림했기 때문에 정확하지는 않습니다. (기침, 거의 괜찮아요, ㅎㅎ)
PageBar="<br/><a href="""&FileName&"?act=View&id="&ID&"&Page=1"">[<<]</a>"
i=CurrentPage-Cint(PAGEBAR_COUNT/2)에서 CurrentPage+Cint(PAGEBAR_COUNT/2)로의 경우
i>0이고 i<=PageCount이면 PageBar=PageBar&"<a href="""&FileName&"?act=View&id="&ID&"&Page="&i&""">["&i&"]</a>"
다음
PageBar=PageBar&"<a href="""&FileName&"?act=View&id="&ID&"&Page="&PageCount&""">[>>]</a>"
출처: Sipo 블로그
http://www.dc9.cn/post/272.html