$dbtype=getenv("DB_TYPE");
}
+//==============================================================
+//
+// Function to return the number of record within a
+// database table.
+//
+//==============================================================
+function sql_getnumrec($dbsql,$table)
+
+{
+$OPEP="gessql.php:sql_getnumrec";
+
+$recnum=NULL;
+if ($dbsql!=NULL) {
+ $stmt=$dbsql->Select("Select count(*) from $table");
+ $recnum=$stmt->fetchColumn();
+ }
+return $recnum;
+}
?>
// vim: smarttab tabstop=8 shiftwidth=2 expandtab
//==============================================================
-//function to update screen limit
+//all system functions
//==============================================================
-function updatelimit()
-
-{
-let limitvalue=document.getElementById("limit-choice").value;
-limitvalue*=10;
-document.getElementById("demo").innerHTML = limitvalue;
-window.location.reload();
-}
include_once "gesdis.php";
include_once "gessql.php";
-function tblheader(int $limit)
+function tblheader(int $numrec,int $offset,int $limit)
{
$STR = <<<EOT
<TR>
-<TH align=left>LEFT</TH>
-<TD align=center> <p id="demo"></p> </TD>
+<TH align=left>
+<FORM action="lvlusr.php" method="post">
+<button name="scanner" value="gottop">
+<FONT SIZE=+3>
+⇤
+</FONT>
+</Button>
+<button name="scanner" value="rewind">
+<FONT SIZE=+3>
+←
+</FONT>
+</Button>
+<FONT SIZE=+2>$offset/$numrec</FONT>
+<button name="scanner" value="forward">
+<FONT SIZE=+3>
+→
+</FONT>
+</Button>
+<button name="scanner" value="golast">
+<FONT SIZE=+3>
+⇥
+</FONT>
+</Button>
+</FORM>
+</TH>
<TD align=right>
<FORM method="post">
-<select name="tbllim" onchange='if(this.value!=0) {this.form.submit();}'>
+<select name="tbllim" onchange='if (this.value!=0) {this.form.submit();}'>
<option selected="selected">$limit</option>
<option value=20>20</option>
<option value=40>40</option>
global $logname;
$limit=20;
+$scanner=$_POST['scanner'];
+rou_alert(0,"JMPDBG scanner=$scanner");
$agent_id=$_POST['tbllim'];
if ( $agent_id!=NULL)
$limit=intval($agent_id);
-rou_alert(0,"JMPDBG agent_id=$agent_id limit=$limit");
+$offset=2*$limit;
$line="";
-$count=0;
$dbsql=sql_connect();
-$emails=sql_getemaillist($dbsql,$limit,NULL);
+$numrec=sql_getnumrec($dbsql,"emails");
+$emails=sql_getemaillist($dbsql,$limit,$offset);
+$count=$offset;
foreach($emails as $email) {
$bgcolor="white";
if ($count & 1 ) {
$stop=endhtml();
$top=topper($isadmin,$logname,"lvlusr");
$footer=footer("lvlusr");
-$tblheader=tblheader($limit);
+$tblheader=tblheader($numrec,$offset,$limit);
$STR = <<<EOT
$start