[ Index ]
 

Code source de vtiger CRM 5.0.2

Accédez au Source d'autres logiciels libresSoutenez Angelica Josefina !

title

Body

[fermer]

/adodb/tests/ -> testgenid.php (source)

   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  ?>


Généré le : Sun Feb 25 10:22:19 2007 par Balluche grâce à PHPXref 0.7