ASP Классический класс страниц
Источник
'==========================================================================================================
'Xdownpageasp версия
'Версия 1.00
'CodeByzykj2000
«Электронная почта: [email protected]
'BBS: http: //bbs.513soft.net
«Эта программа может быть использована и модифицирована бесплатно. Я надеюсь, что моя программа может принести удобство вашей работы
'Но, пожалуйста, сохраните выше, пожалуйста, отказ
'
'Функции программы
«Эта программа в основном инкапсулирует часть подкрепления данных, а часть отображения данных полностью настроена пользователем.
'Поддерживать несколько параметров URL -адреса
'
'Инструкции для использования
'Описание параметра программы
'Papgesize определяет количество записей для каждой страницы страницы пейджинга
'Getrs возвращает набор записей на странице. Это свойство только читается
'GetConn получает подключение к базе данных
'Getsql получает заявление запроса
'Описание метода программы
'ShowPage отображает панель навигации страницы, единственный публичный метод
'
'пример:
'
'Включите файлы
'
'Setmypage = newxdownpage' create object
'mypage.getConn = conn' Получить подключение к базе данных
'mypage.getsql = "select*fromproductinfoorderbyidasc"
'mypage.pagesize = 5'Set Данные записи каждой страницы на 5
'setrs = mypage.getrs ()' Возвращает сетевые записи
'mypage.showpage ()' Отображает информацию о пейджинге. Этот метод в порядке после setrs = mypage.getrs ()
'Вызванный в любом месте, можно называться несколько раз
'fori = 1tomypage.pagesize'se следующая операция такая же, как эксплуатировать обычный объект записи
'ifnotrs.eofthen' - предотвратить переполнение последней страницы
'response.writers (0) & "
«Вы можете настроить метод отображения здесь
Rs.movenext
'еще
'exitfor
'endif
'следующий
'
'==========================================================================================================
Constbtn_first = "9" 'Определите стиль отображения кнопки первой страницы
Constbtn_prev = "3" 'определить стиль отображения предыдущей страницы
Constbtn_next = "4" 'определить стиль дисплея следующей страницы
Constbtn_last = ":" 'определить стиль отображения последней страницы
Constxd_align = "center" 'Определите выравнивание информации о пейджинге
Constxd_width = "100%" 'Определяет размер информационного поля пейджинг
Constxd_height = "20"
ClassXdownPage
Privatexd_pagecount, xd_conn, xd_rs, xd_sql, xd_pagesize, str_errors, int_curpage, str_url, int_totalpage, int_totalrecord