Super ASP Large Page_My -Klasse Inhalt Ich wähle aus dem Blog von Applebbs
Keyword Super ASP Large Page_my Klasse Inhalt Ich triffe die Entscheidung
Quelle
<%
'==============================================================================================
'ShowmorepageaSP -Version
'Versionhuangjm1.00
'Codebymaomao
'Createdate2004-09-28
'QQ: 5144707
'http://blog.csdn.net/maomaoysq
'RecordFormylover: Huangjm'this -Programm kann kostenlos verwendet und geändert werden, aber bitte behalten Sie die oben genannten Informationen auf
''
'Funktion
'Dieses Programm verkauft hauptsächlich den Datenpaging -Teil, und der Datenanzeigeteil wird vom Benutzer vollständig angepasst.
'Unterstützung mehrerer Parameter von URL: http: //www.***.com/***.asp? Aa = 1 & page = 9 & bb = 2
''
''
'Paramere:
'Papgesize definiert die Anzahl der Datensätze für jede Seite der Paging -Seite
'GetCurpagenum gibt die Anzahl der Datensätze der aktuellen Seite zurück. Diese Eigenschaft ist nur gelesen
'GetRS gibt ein ausgelastetes Datensatz zurück. Diese Eigenschaft ist nur gelesen
'GetConn erhält die Datenbankverbindung
'GetQl erhält eine Anweisung für Abfragen
'Schnittstelle
'ShowPage zeigt die Seitennavigationsleiste an, die einzige öffentliche Methode
''
'######################################################################################## zurild
'Erstellen Sie ein Objekt
'Sethjmpage = newshowmorepage
'Holen Sie sich die Datenbankverbindung
'hjmpage.getConn = conn
'SQL Anweisung
'hjmpage.getSQL = "SELECT*Fromshop_Bookswherenewsbook = 1OrderByBookidDesc"
'Legen Sie die Datensatzdaten auf jeder Seite auf 20 fest und die Standardanzeige beträgt 10.
'hjmpage.pageSize = 20
'Paging -Informationen anzeigen, kann an jedem Ort aufgerufen werden, kann mehrmals aufgerufen werden
'hjmpage.showpage ())
'setrs = hjmpage.getrs ()' gibt Recordset zurück
'Daten anzeigen Starts
'Sie können die Anzeigemethode hier anpassen
'fei = 1tohjmpage.getCurpagenum' Anzahl der Datensätze auf der aktuellen Seite
'response.writeLeft (trim (rs ("bookName"), 13) & "...."
'Rs.Movenext
'nächste
'Daten zeigen endet
'Sethjmpage = nichts
'######################################################################################## zurild
'==============================================================================================
ConstBtn_first = "<fontface =" "Webdings" "> 9 </font>" 'Definieren Sie die Schaltfläche "Erstes". Anzeigestil
ConstBtn_prev = "<fontface =" "Webdings" "> 3 </font>" 'Definieren Sie den Schaltfläche Anzeigestil auf der vorherigen Seite
ConstBtn_next = "<fontface =" "Webdings" "> 4 </font>" 'Definieren Sie die Schaltfläche "nächste Seite". Anzeigestil
ConstBtn_last = "<fontface =" "Webdings" ">: </font>" 'Definieren Sie die Schaltfläche "Last Page" Anzeigestil
ConstXd_align = "center" 'definiert die Ausrichtung von Paging -Informationen
ConstXd_width = "100%" 'definiert die Größe des Paging Information Box