home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2005 October / PCWOCT05.iso / Software / FromTheMag / XAMPP 1.4.14 / xampp-win32-1.4.14-installer.exe / xampp / php / pear / adodb / tests / testgenid.php < prev    next >
Encoding:
PHP Script  |  2004-07-06  |  766 b   |  36 lines
  1. <?php
  2. /*
  3.     V4.50 6 July 2004 
  4.     
  5.     Run multiple copies of this php script at the same time
  6.     to test unique generation of id's in multiuser mode
  7. */
  8. include_once('../adodb.inc.php');
  9. $testaccess = true;
  10. include_once('testdatabases.inc.php');
  11.  
  12. function testdb(&$db,$createtab="create table ADOXYZ (id int, firstname char(24), lastname char(24), created date)")
  13. {
  14.     $table = 'adodbseq';
  15.     
  16.     $db->Execute("drop table $table");
  17.     //$db->debug=true;
  18.     
  19.     $ctr = 5000;
  20.     $lastnum = 0;
  21.     
  22.     while (--$ctr >= 0) {
  23.         $num = $db->GenID($table);
  24.         if ($num === false) {    
  25.             print "GenID returned false";
  26.             break;
  27.         }
  28.         if ($lastnum + 1 == $num) print " $num ";
  29.         else {
  30.             print " <font color=red>$num</font> ";
  31.             flush();
  32.         }
  33.         $lastnum = $num;
  34.     }
  35. }
  36. ?>