목록페이징함수 (1)

3초기억력

asp - paging 함수

Function GetPageList(ByVal CurPage, ByVal PageCount, ByVal PageScale, ByVal Parametter, ByVal DesignType) Dim Path, PrevPage, NextPage, LastPage, FirstPage, PageStr Dim FirstImg, NextImg, LastImg, PrevImg Dim FromPage, ToPage, i Select Case DesignType Case "Text" FirstImg = "◀◀" PrevImg = "◀" NextImg = "▶" LastImg = "▶▶" Case Else FirstImg = "" PrevImg = "" NextImg = "" LastImg = "" End Select '..
플밍_ASP 2010. 3. 24. 12:35
이전 Prev 1 Next 다음