#explode
/* Code phân trang XtScript */
/* Viết bởi Jin9x */
function page $noidung=chưa có gì;$show=500;$url=;
get p
if $p ==
var $p=1
endif
var $batdau =($p*$show-$show)
if $noidung <= $show
var $cut = $noidung
else
var $cut = call substr $val=$noidung;$start=$batdau;$length=$show;
endif
print $cut
var $lnd = call strlen $val=$noidung
var $nump =($lnd/$show)
var $nump = call ceil $num=$nump
if $nump>1
print Trang:
if $p!=1
var $dau =
1,
var $prev =
[<]
if $p != 2
var $prevp =
($p-1),
endif
if $p > 3
var $prevvp =
($p-2),
endif
endif
if $p!=$nump
var $cuoi = ,
$nump
if $p != ($nump-1)
var $nextp = ,
($p+1)
endif
if $p<($nump-2)
var $nexttp = ,
($p+2)
endif
var $next =
[>]
endif
print $prev $dau$prevvp$prevp[$p]$nextp$nexttp$cuoi $next
Đến trang:
endif
endfunction