lastlogins.php

来自「GForge 3.0 协作开发平台 支持CVS, mailing lists, 」· PHP 代码 · 共 55 行

<?php
/**
  *
  * Page to view latest logins to the site
  *
  * WARNING: this should probably be moved to /stats/ for consistency
  *
  * SourceForge: Breaking Down the Barriers to Open Source Development
  * Copyright 1999-2001 (c) VA Linux Systems
  * http://sourceforge.net
  *
  * @version   $Id: lastlogins.php,v 1.2 2001/04/24 15:55:08 pfalcon Exp $
  *
  */

require_once('pre.php');

session_require(array('group'=>'1','admin_flags'=>'A'));

$res_logins = db_query("SELECT session.user_id AS user_id,"
	. "session.ip_addr AS ip_addr,"
	. "session.time AS time,"
	. "users.user_name AS user_name FROM session,users "
	. "WHERE session.user_id=users.user_id AND "
	. "session.user_id>0 AND session.time>0 ORDER BY session.time DESC",50);

if (!$res_logins || db_numrows($res_logins) < 1) {
	exit_error($Language->getText('stats_lastlogins','no_records').db_error());
}

$HTML->header(array('title'=>$Language->getText('stats_lastlogins','last_logins')));

print '<h3>'.$Language->getText('stats_lastlogins','most_recent_open').'</h3>';

$title=array();
$title[]=$Language->getText('stats_lastlogins','date');
$title[]=$Language->getText('stats_lastlogins','username');
$title[]=$Language->getText('stats_lastlogins','source_ip');

echo $GLOBALS['HTML']->listTableTop($title);

while ($row_logins = db_fetch_array($res_logins)) {
	print '<tr>';
	print '<td>'.date($sys_datefmt, $row_logins['time']).'</td>';
	print '<td>'.$row_logins['user_name'].'</td>';
	print '<td>'.$row_logins['ip_addr'].'</td>';
	print '</tr>';
}

echo $GLOBALS['HTML']->listTableBottom();

$HTML->footer(array());

?>