Forum
Selidopiisi Stoixeiwn - Από {dm}
Se paliotero reply se ena user me to idio erwtima dosate tin pio kato apantisi.. dokimasa ton kwdika alla mallon kati den katalaba swsta. Δεν υπάρχουν θεματα. "
-----> H proigoumeni apantisi --->
Όσον αφορά το επόμενη, προηγούμενη σελίδα κλπ.
Θα πρέπει να φτιάξεις ένα navigation bar για το αρχείο σου.
Αμέσως μετά το ερώτημα στην database τοποθέτησε τα παρακάτω:
rs.PageSize = 10
iPageCount = rs.PageCount
lRecs = rs.RecordCount
iPage = request("page")
if isNumeric(iPage) then iPage = CLng(iPage)
if iPage < 1 then iPage = 1
if lRecs > 0 then rs.AbsolutePage = iPage
if not (lRecs > 0) then response.write "
sNavBar = "
'Εδώ το navigation bar
if iPage <> 1 then sNavBar = sNavBar & "Πρώτη " else sNavBar = sNavBar & "Πρώτη "
if iPage > 1 then sNavBar = sNavBar & " Προηγούμενη " else sNavBar = sNavBar & " Προηγούμενη "
if iPage < iPageCount then sNavBar = sNavBar & " Επόμενη " else sNavBar = sNavBar & " Επόμενη "
if iPage <> iPageCount then sNavBar = sNavBar & " Τελευταία" else sNavBar = sNavBar & " Τελευταία"
sNavBar = sNavBar & "Σελίδα " & iPage & " από " & iPageCount & "
if lRecs > 0 then response.write sNavBar
%>
Πριν την παρουσίαση των αποτελεσμάτων θα πρέπει να τοποθετήσεις το:
do while not (rs.eof or (rs.AbsolutePage <> iPage))
Δηλαδή εκεί που αρχίζεις τα
spedio= rs("pedio") κλπ θα πρέπει να:
do while not (rs.eof or (rs.AbsolutePage <> iPage))¨
spedio= rs("pedio")
Τώρα για να τοποθετήσεις nav bar και στο κάτω μέρος των σελίδων σου θα πρέπει να δώσεις μετά το κλείσιμο τις σύνδεσης τα παρακάτω:
CloseDB
response.write ""
if lRecs > 0 then response.write sNavBar
---->
1) Pano apo to rs.PageSize = 10 egw vazw p.x set rs=dbConn.Execute("select * from members")
2) Gia tin emfanisi twn stoixeiwn:
while not (rs.eof or (rs.AbsolutePage <> iPage))
response.write rs("username")
H apantisi pou perno ine "Δεν υπάρχουν θεματα" eno to database mou exi stoixeia mesa..
Mpori na mou pi kapios ti kano lathos, h esto na grapsei olo ton kodika opos prepi na xrisimopiithei?
Euxaristo!
tip: * F5 για νέο tip