Update to upstream version 4.94
[Packages/TYPO3.CMS.git] / typo3 / sysext / adodb / adodb / tests / test.php
index 95caa33..149c08e 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /* 
 <?php
 /* 
-V4.80 8 Mar 2006  (c) 2000-2006 John Lim (jlim#natsoft.com.my). All rights reserved.
+V4.80 8 Mar 2006  (c) 2000-2007 John Lim (jlim#natsoft.com.my). All rights reserved.
   Released under both BSD license and Lesser GPL library license. 
   Whenever there is any discrepancy between the two licenses, 
   the BSD license will take precedence. 
   Released under both BSD license and Lesser GPL library license. 
   Whenever there is any discrepancy between the two licenses, 
   the BSD license will take precedence. 
@@ -9,7 +9,9 @@ V4.80 8 Mar 2006  (c) 2000-2006 John Lim (jlim#natsoft.com.my). All rights reser
   Latest version is available at http://adodb.sourceforge.net
 */
 
   Latest version is available at http://adodb.sourceforge.net
 */
 
-error_reporting(E_ALL);
+
+if (!defined('E_STRICT')) define('E_STRICT',0);
+error_reporting(E_ALL|E_STRICT);
 
 $ADODB_FLUSH = true;
 
 
 $ADODB_FLUSH = true;
 
@@ -85,7 +87,7 @@ GLOBAL $ADODB_vers,$ADODB_CACHE_DIR,$ADODB_FETCH_MODE,$ADODB_COUNTRECS;
        $create =false;
        /*$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        
        $create =false;
        /*$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        
-       $rs = $db->Execute('select lastname,firstname,lastname,id from adoxyz');
+       $rs = $db->Execute('select lastname,firstname,lastname,id from ADOXYZ');
        $arr = $rs->GetAssoc();
        echo "<pre>";print_r($arr);
        die();*/
        $arr = $rs->GetAssoc();
        echo "<pre>";print_r($arr);
        die();*/
@@ -124,13 +126,16 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
        if (defined('ADODB_EXTENSION')) $ext = ' &nbsp; Extension '.ADODB_EXTENSION.' installed';
        else $ext = '';
        print "<h3>ADODB Version: $ADODB_vers Host: <i>$db->host</i> &nbsp; Database: <i>$db->database</i> &nbsp; PHP: $phpv $ext</h3>";
        if (defined('ADODB_EXTENSION')) $ext = ' &nbsp; Extension '.ADODB_EXTENSION.' installed';
        else $ext = '';
        print "<h3>ADODB Version: $ADODB_vers Host: <i>$db->host</i> &nbsp; Database: <i>$db->database</i> &nbsp; PHP: $phpv $ext</h3>";
+       
        flush();
 
        flush();
 
+       if (function_exists('date_default_timezone_set')) date_default_timezone_set('Asia/Kuala_Lumpur');
        
        $arr = $db->ServerInfo();
        print_r($arr);
        
        $arr = $db->ServerInfo();
        print_r($arr);
-       echo "<br>";
-       $e = error_reporting(E_ALL-E_WARNING);
+       echo E_ALL,' ',E_STRICT, "<br>";
+       $e = error_reporting(E_ALL | E_STRICT);
+       echo error_reporting(),'<p>';
        flush();
        #$db->debug=1;
        $tt  = $db->Time(); 
        flush();
        #$db->debug=1;
        $tt  = $db->Time(); 
@@ -164,11 +169,11 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
                print "<i>Error='$err'</i></p>";
                if ($rez) print "<b>Cannot check if connection failed.</b> The Connect() function returned true.</p>";
        }
                print "<i>Error='$err'</i></p>";
                if ($rez) print "<b>Cannot check if connection failed.</b> The Connect() function returned true.</p>";
        }
-       error_reporting($e);
+       #error_reporting($e);
        flush();
 
        //$ADODB_COUNTRECS=false;
        flush();
 
        //$ADODB_COUNTRECS=false;
-       $rs=$db->Execute('select * from adoxyz order by id');
+       $rs=$db->Execute('select * from ADOXYZ order by id');
        if($rs === false) $create = true;
        else $rs->Close();
        
        if($rs === false) $create = true;
        else $rs->Close();
        
@@ -180,24 +185,24 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
                        return;
                } else {
                        $db->debug = 99;
                        return;
                } else {
                        $db->debug = 99;
-                       $e = error_reporting(E_ALL-E_WARNING);
+               #       $e = error_reporting(E_ALL-E_WARNING);
                        $db->Execute($createtab);
                        $db->Execute($createtab);
-                       error_reporting($e);
+               #       error_reporting($e);
                }
        }
                }
        }
-       error_reporting(E_ALL);
+       #error_reporting(E_ALL);
        echo "<p>Testing Metatypes</p>";
        $t = $db->MetaType('varchar');
        if ($t != 'C') Err("Bad Metatype for varchar");
        
        echo "<p>Testing Metatypes</p>";
        $t = $db->MetaType('varchar');
        if ($t != 'C') Err("Bad Metatype for varchar");
        
-       $rs = &$db->Execute("delete from ADOXYZ"); // some ODBC drivers will fail the drop so we delete
+       $rs = $db->Execute("delete from ADOXYZ"); // some ODBC drivers will fail the drop so we delete
        if ($rs) {
                if(! $rs->EOF) print "<b>Error: </b>RecordSet returned by Execute('delete...') should show EOF</p>";
                $rs->Close();
        } else print "err=".$db->ErrorMsg();
 
        print "<p>Test select on empty table, FetchField when EOF, and GetInsertSQL</p>";
        if ($rs) {
                if(! $rs->EOF) print "<b>Error: </b>RecordSet returned by Execute('delete...') should show EOF</p>";
                $rs->Close();
        } else print "err=".$db->ErrorMsg();
 
        print "<p>Test select on empty table, FetchField when EOF, and GetInsertSQL</p>";
-       $rs = &$db->Execute("select id,firstname from ADOXYZ where id=9999");
+       $rs = $db->Execute("select id,firstname from ADOXYZ where id=9999");
        if ($rs && !$rs->EOF) print "<b>Error: </b>RecordSet returned by Execute(select...') on empty table should show EOF</p>";
        if ($rs->EOF && (($ox = $rs->FetchField(0)) && !empty($ox->name))) {
                $record['id'] = 99;
        if ($rs && !$rs->EOF) print "<b>Error: </b>RecordSet returned by Execute(select...') on empty table should show EOF</p>";
        if ($rs->EOF && (($ox = $rs->FetchField(0)) && !empty($ox->name))) {
                $record['id'] = 99;
@@ -221,10 +226,10 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
                $rs = $db->Execute("insert into ADOXYZ (id,firstname,lastname,created) values (99,'Should Not','Exist (Commit)',$time)");
                if ($rs && $db->CommitTrans()) {
                        $rs->Close();
                $rs = $db->Execute("insert into ADOXYZ (id,firstname,lastname,created) values (99,'Should Not','Exist (Commit)',$time)");
                if ($rs && $db->CommitTrans()) {
                        $rs->Close();
-                       $rs = &$db->Execute("select * from ADOXYZ where id=99");
+                       $rs = $db->Execute("select * from ADOXYZ where id=99");
                        if ($rs === false || $rs->EOF) {
                                print '<b>Data not saved</b></p>';
                        if ($rs === false || $rs->EOF) {
                                print '<b>Data not saved</b></p>';
-                               $rs = &$db->Execute("select * from ADOXYZ where id=99");
+                               $rs = $db->Execute("select * from ADOXYZ where id=99");
                                print_r($rs);
                                die();
                        } else print 'OK</p>';
                                print_r($rs);
                                die();
                        } else print 'OK</p>';
@@ -249,7 +254,7 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
                } else
                        print "<b>Commit failed</b></p>";
                        
                } else
                        print "<b>Commit failed</b></p>";
                        
-               $rs = &$db->Execute('delete from ADOXYZ where id>50');
+               $rs = $db->Execute('delete from ADOXYZ where id>50');
                if ($rs) $rs->Close();
                
                if ($db->transCnt != 0) Err("Invalid transCnt = $db->transCnt (should be 0)");
                if ($rs) $rs->Close();
                
                if ($db->transCnt != 0) Err("Invalid transCnt = $db->transCnt (should be 0)");
@@ -320,7 +325,7 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
                $a = $db->MetaPrimaryKeys('ADOXYZ');
                var_dump($a);
        }
                $a = $db->MetaPrimaryKeys('ADOXYZ');
                var_dump($a);
        }
-       $rs = &$db->Execute('delete from ADOXYZ');
+       $rs = $db->Execute('delete from ADOXYZ');
        if ($rs) $rs->Close();
        
        $db->debug = false;
        if ($rs) $rs->Close();
        
        $db->debug = false;
@@ -344,7 +349,7 @@ FROM `nuke_stories` `t1`, `nuke_authors` `t2`, `nuke_stories_cat` `t3`, `nuke_to
 ef")."</p>";//'
 
                print "<p>Testing Foreign Keys</p>";
 ef")."</p>";//'
 
                print "<p>Testing Foreign Keys</p>";
-               $arr = $db->MetaForeignKeys('adoxyz',false,true);
+               $arr = $db->MetaForeignKeys('ADOXYZ',false,true);
                print_r($arr);
                if (!$arr) Err("No MetaForeignKeys");
                break;
                print_r($arr);
                if (!$arr) Err("No MetaForeignKeys");
                break;
@@ -769,7 +774,7 @@ END Adodb;
                print_r($rs->fields);
        }
        if ($db->databaseType !== 'odbc') {
                print_r($rs->fields);
        }
        if ($db->databaseType !== 'odbc') {
-               $rs = &$db->Execute("select id,firstname,lastname,created,".$db->random." from ADOXYZ order by id");
+               $rs = $db->Execute("select id,firstname,lastname,created,".$db->random." from ADOXYZ order by id");
                if ($rs) {
                        if ($rs->RecordCount() != 50) {
                                print "<p><b>RecordCount returns ".$rs->RecordCount().", should be 50</b></p>";
                if ($rs) {
                        if ($rs->RecordCount() != 50) {
                                print "<p><b>RecordCount returns ".$rs->RecordCount().", should be 50</b></p>";
@@ -794,7 +799,7 @@ END Adodb;
         echo "<b>GetRow Test</b>";
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        $val1 = $db->GetRow("select count(*) from ADOXYZ");
         echo "<b>GetRow Test</b>";
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        $val1 = $db->GetRow("select count(*) from ADOXYZ");
-       $val2 =& $db->GetRow("select count(*) from ADOXYZ");
+       $val2 = $db->GetRow("select count(*) from ADOXYZ");
         if ($val1[0] == 50 and sizeof($val1) == 1 and $val2[0] == 50 and sizeof($val2) == 1) print "<p>GetRow returns ok</p>";
         else {
                print_r($val);
         if ($val1[0] == 50 and sizeof($val1) == 1 and $val2[0] == 50 and sizeof($val2) == 1) print "<p>GetRow returns ok</p>";
         else {
                print_r($val);
@@ -857,7 +862,7 @@ END Adodb;
        }
        
        print "<p>FETCH_MODE = ASSOC: Should get 1, Caroline</p>";
        }
        
        print "<p>FETCH_MODE = ASSOC: Should get 1, Caroline</p>";
-       $rs = &$db->SelectLimit('select id,firstname from ADOXYZ order by id',2);
+       $rs = $db->SelectLimit('select id,firstname from ADOXYZ order by id',2);
        if ($rs && !$rs->EOF) {
                if (ADODB_ASSOC_CASE == 2) {
                        $id = 'ID';
        if ($rs && !$rs->EOF) {
                if (ADODB_ASSOC_CASE == 2) {
                        $id = 'ID';
@@ -880,7 +885,7 @@ END Adodb;
        
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        print "<p>FETCH_MODE = NUM: Should get 1, Caroline</p>";
        
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        print "<p>FETCH_MODE = NUM: Should get 1, Caroline</p>";
-       $rs = &$db->SelectLimit('select id,firstname from ADOXYZ order by id',1);
+       $rs = $db->SelectLimit('select id,firstname from ADOXYZ order by id',1);
        if ($rs && !$rs->EOF) {
                if (isset($rs->fields['id'])) Err("FETCH_NUM has ASSOC fields");
                if ($rs->fields[0] != 1)  {Err("Error 1"); print_r($rs->fields);};
        if ($rs && !$rs->EOF) {
                if (isset($rs->fields['id'])) Err("FETCH_NUM has ASSOC fields");
                if ($rs->fields[0] != 1)  {Err("Error 1"); print_r($rs->fields);};
@@ -893,9 +898,9 @@ END Adodb;
        
        $db->debug = false;
        print "<p>GetRowAssoc Upper: Should get 1, Caroline</p>";
        
        $db->debug = false;
        print "<p>GetRowAssoc Upper: Should get 1, Caroline</p>";
-       $rs = &$db->SelectLimit('select id,firstname from ADOXYZ order by id',1);
+       $rs = $db->SelectLimit('select id,firstname from ADOXYZ order by id',1);
        if ($rs && !$rs->EOF) {
        if ($rs && !$rs->EOF) {
-               $arr = &$rs->GetRowAssoc();
+               $arr = $rs->GetRowAssoc();
                if ($arr['ID'] != 1) {Err("Error 1");print_r($arr);};
                if (trim($arr['FIRSTNAME']) != 'Caroline') {Err("Error 2"); print_r($arr);};
                $rs->MoveNext();
                if ($arr['ID'] != 1) {Err("Error 1");print_r($arr);};
                if (trim($arr['FIRSTNAME']) != 'Caroline') {Err("Error 2"); print_r($arr);};
                $rs->MoveNext();
@@ -903,16 +908,16 @@ END Adodb;
 
        }
        print "<p>GetRowAssoc Lower: Should get 1, Caroline</p>";
 
        }
        print "<p>GetRowAssoc Lower: Should get 1, Caroline</p>";
-       $rs = &$db->SelectLimit('select id,firstname from ADOXYZ order by id',1);
+       $rs = $db->SelectLimit('select id,firstname from ADOXYZ order by id',1);
        if ($rs && !$rs->EOF) {
        if ($rs && !$rs->EOF) {
-               $arr = &$rs->GetRowAssoc(false);
+               $arr = $rs->GetRowAssoc(false);
                if ($arr['id'] != 1) {Err("Error 1"); print_r($arr);};
                if (trim($arr['firstname']) != 'Caroline') {Err("Error 2"); print_r($arr);};
 
        }
        
        print "<p>GetCol Test</p>";
                if ($arr['id'] != 1) {Err("Error 1"); print_r($arr);};
                if (trim($arr['firstname']) != 'Caroline') {Err("Error 2"); print_r($arr);};
 
        }
        
        print "<p>GetCol Test</p>";
-       $col = $db->GetCol('select distinct firstname from adoxyz order by 1');
+       $col = $db->GetCol('select distinct firstname from ADOXYZ order by 1');
        if (!is_array($col)) Err("Col size is wrong");
        if (trim($col[0]) != 'Alan' or trim($col[9]) != 'Yat Sun') Err("Col elements wrong");
 
        if (!is_array($col)) Err("Col size is wrong");
        if (trim($col[0]) != 'Alan' or trim($col[9]) != 'Yat Sun') Err("Col elements wrong");
 
@@ -929,7 +934,7 @@ END Adodb;
        
        
        print "<p>SelectLimit Distinct Test 1: Should see Caroline, John and Mary</p>";
        
        
        print "<p>SelectLimit Distinct Test 1: Should see Caroline, John and Mary</p>";
-       $rs = &$db->SelectLimit('select distinct * from ADOXYZ order by id',3);
+       $rs = $db->SelectLimit('select distinct * from ADOXYZ order by id',3);
        
        
        if ($rs && !$rs->EOF) {
        
        
        if ($rs && !$rs->EOF) {
@@ -945,7 +950,7 @@ END Adodb;
        } else Err("Failed SelectLimit Test 1");
        
        print "<p>SelectLimit Test 2: Should see Mary, George and Mr. Alan</p>";
        } else Err("Failed SelectLimit Test 1");
        
        print "<p>SelectLimit Test 2: Should see Mary, George and Mr. Alan</p>";
-       $rs = &$db->SelectLimit('select * from ADOXYZ order by id',3,2);
+       $rs = $db->SelectLimit('select * from ADOXYZ order by id',3,2);
        if ($rs && !$rs->EOF) {
                if (trim($rs->fields[1]) != 'Mary') Err("Error 1 - No Mary, instead: ".$rs->fields[1]);
                $rs->MoveNext();
        if ($rs && !$rs->EOF) {
                if (trim($rs->fields[1]) != 'Mary') Err("Error 1 - No Mary, instead: ".$rs->fields[1]);
                $rs->MoveNext();
@@ -961,7 +966,7 @@ END Adodb;
        print "<p>SelectLimit Test 3: Should see Wai Hun and Steven</p>";
        $db->debug=1;
        global $A; $A=1;
        print "<p>SelectLimit Test 3: Should see Wai Hun and Steven</p>";
        $db->debug=1;
        global $A; $A=1;
-       $rs = &$db->SelectLimit('select * from ADOXYZ order by id',-1,48);
+       $rs = $db->SelectLimit('select * from ADOXYZ order by id',-1,48);
        $A=0;
        if ($rs && !$rs->EOF) {
                if (empty($rs->connection)) print "<b>Connection object missing from recordset</b></br>";
        $A=0;
        if ($rs && !$rs->EOF) {
                if (empty($rs->connection)) print "<b>Connection object missing from recordset</b></br>";
@@ -978,7 +983,7 @@ END Adodb;
                $db->debug = false;
        
        
                $db->debug = false;
        
        
-       $rs = &$db->Execute("select * from ADOXYZ order by id");
+       $rs = $db->Execute("select * from ADOXYZ order by id");
        print "<p>Testing Move()</p>";  
        if (!$rs)Err( "Failed Move SELECT");
        else {
        print "<p>Testing Move()</p>";  
        if (!$rs)Err( "Failed Move SELECT");
        else {
@@ -1037,10 +1042,10 @@ END Adodb;
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        if ($db->dataProvider == 'postgres') {
                $sql = "select ".$db->Concat('cast(firstname as varchar)',$db->qstr(' '),'lastname')." as fullname,id,".$db->sysTimeStamp." as d from ADOXYZ";
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        if ($db->dataProvider == 'postgres') {
                $sql = "select ".$db->Concat('cast(firstname as varchar)',$db->qstr(' '),'lastname')." as fullname,id,".$db->sysTimeStamp." as d from ADOXYZ";
-               $rs = &$db->Execute($sql);
+               $rs = $db->Execute($sql);
        } else {
                $sql = "select distinct ".$db->Concat('firstname',$db->qstr(' '),'lastname')." as fullname,id,".$db->sysTimeStamp." as d from ADOXYZ";
        } else {
                $sql = "select distinct ".$db->Concat('firstname',$db->qstr(' '),'lastname')." as fullname,id,".$db->sysTimeStamp." as d from ADOXYZ";
-               $rs = &$db->Execute($sql);
+               $rs = $db->Execute($sql);
        }
        if ($rs) {
                if (empty($_GET['hide'])) rs2html($rs);
        }
        if ($rs) {
                if (empty($_GET['hide'])) rs2html($rs);
@@ -1051,9 +1056,9 @@ END Adodb;
        print "<hr />Testing GetArray() ";
        //$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        
        print "<hr />Testing GetArray() ";
        //$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        
-       $rs = &$db->Execute("select * from ADOXYZ order by id");
+       $rs = $db->Execute("select * from ADOXYZ order by id");
        if ($rs) {
        if ($rs) {
-               $arr = &$rs->GetArray(10);
+               $arr = $rs->GetArray(10);
                if (sizeof($arr) != 10 || trim($arr[1][1]) != 'John' || trim($arr[1][2]) != 'Lim') print $arr[1][1].' '.$arr[1][2]."<b> &nbsp; ERROR</b><br>";
                else print " OK<BR>";
        }
                if (sizeof($arr) != 10 || trim($arr[1][1]) != 'John' || trim($arr[1][2]) != 'Lim') print $arr[1][1].' '.$arr[1][2]."<b> &nbsp; ERROR</b><br>";
                else print " OK<BR>";
        }
@@ -1063,7 +1068,7 @@ END Adodb;
        echo "Testing error handling, should see illegal column 'x' error=<i>$e ($e2) </i><br>";
        if (!$e || !$e2) Err("Error handling did not work");
        print "Testing FetchNextObject for 1 object ";
        echo "Testing error handling, should see illegal column 'x' error=<i>$e ($e2) </i><br>";
        if (!$e || !$e2) Err("Error handling did not work");
        print "Testing FetchNextObject for 1 object ";
-       $rs = &$db->Execute("select distinct lastname,firstname from ADOXYZ where firstname='Caroline'");
+       $rs = $db->Execute("select distinct lastname,firstname from ADOXYZ where firstname='Caroline'");
        $fcnt = 0;
        if ($rs)
        while ($o = $rs->FetchNextObject()) {
        $fcnt = 0;
        if ($rs)
        while ($o = $rs->FetchNextObject()) {
@@ -1086,7 +1091,7 @@ END Adodb;
        //$arr = $db->GetArray("select  lastname,firstname from ADOXYZ");
        //print_r($arr);
        print "<hr />";
        //$arr = $db->GetArray("select  lastname,firstname from ADOXYZ");
        //print_r($arr);
        print "<hr />";
-       $rs =& $db->Execute("select distinct lastname,firstname,created from ADOXYZ");
+       $rs = $db->Execute("select distinct lastname,firstname,created from ADOXYZ");
        
        if ($rs) {
                $arr = $rs->GetAssoc();
        
        if ($rs) {
                $arr = $rs->GetAssoc();
@@ -1095,7 +1100,7 @@ END Adodb;
                else print " OK 1";
        }
        
                else print " OK 1";
        }
        
-       $arr = &$db->GetAssoc("select distinct lastname,firstname from ADOXYZ");
+       $arr = $db->GetAssoc("select distinct lastname,firstname from ADOXYZ");
        if ($arr) {
                //print_r($arr);
                if (empty($arr['See']) || trim($arr['See']) != 'Wai Hun') print $arr['See']." &nbsp; <b>ERROR</b><br>";
        if ($arr) {
                //print_r($arr);
                if (empty($arr['See']) || trim($arr['See']) != 'Wai Hun') print $arr['See']." &nbsp; <b>ERROR</b><br>";
@@ -1111,31 +1116,31 @@ END Adodb;
        for ($loop=0; $loop < 1; $loop++) {
        print "Testing GetMenu() and CacheExecute<BR>";
        $db->debug = true;
        for ($loop=0; $loop < 1; $loop++) {
        print "Testing GetMenu() and CacheExecute<BR>";
        $db->debug = true;
-       $rs = &$db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
        
        
 
 
        if ($rs) print 'With blanks, Steven selected:'. $rs->GetMenu('menu','Steven').'<BR>'; 
        else print " Fail<BR>";
        
        
 
 
        if ($rs) print 'With blanks, Steven selected:'. $rs->GetMenu('menu','Steven').'<BR>'; 
        else print " Fail<BR>";
-       $rs = &$db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
        
        if ($rs) print ' No blanks, Steven selected: '. $rs->GetMenu('menu','Steven',false).'<BR>';
        else print " Fail<BR>";
        
        
        if ($rs) print ' No blanks, Steven selected: '. $rs->GetMenu('menu','Steven',false).'<BR>';
        else print " Fail<BR>";
        
-       $rs = &$db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
        
        if ($rs) print ' 1st line set to **** , Steven selected: '. $rs->GetMenu('menu','Steven','1st:****').'<BR>';
        else print " Fail<BR>";
        
 
        
        
        if ($rs) print ' 1st line set to **** , Steven selected: '. $rs->GetMenu('menu','Steven','1st:****').'<BR>';
        else print " Fail<BR>";
        
 
        
-       $rs = &$db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
        if ($rs) print ' Multiple, Alan selected: '. $rs->GetMenu('menu','Alan',false,true).'<BR>';
        else print " Fail<BR>";
        print '</p><hr />';
        
        if ($rs) print ' Multiple, Alan selected: '. $rs->GetMenu('menu','Alan',false,true).'<BR>';
        else print " Fail<BR>";
        print '</p><hr />';
        
-       $rs = &$db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
        if ($rs) {
                print ' Multiple, Alan and George selected: '. $rs->GetMenu('menu',array('Alan','George'),false,true);
                if (empty($rs->connection)) print "<b>Connection object missing from recordset</b></br>";
        if ($rs) {
                print ' Multiple, Alan and George selected: '. $rs->GetMenu('menu',array('Alan','George'),false,true);
                if (empty($rs->connection)) print "<b>Connection object missing from recordset</b></br>";
@@ -1149,22 +1154,22 @@ END Adodb;
        print "<hr />";
 
        print "Testing GetMenu2() <BR>";
        print "<hr />";
 
        print "Testing GetMenu2() <BR>";
-       $rs = &$db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(4,"select distinct firstname,lastname from ADOXYZ");
        if ($rs) print 'With blanks, Steven selected:'. $rs->GetMenu2('menu',('Oey')).'<BR>'; 
        else print " Fail<BR>";
        if ($rs) print 'With blanks, Steven selected:'. $rs->GetMenu2('menu',('Oey')).'<BR>'; 
        else print " Fail<BR>";
-       $rs = &$db->CacheExecute(6,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(6,"select distinct firstname,lastname from ADOXYZ");
        if ($rs) print ' No blanks, Steven selected: '. $rs->GetMenu2('menu',('Oey'),false).'<BR>';
        else print " Fail<BR>";
        }
        if ($rs) print ' No blanks, Steven selected: '. $rs->GetMenu2('menu',('Oey'),false).'<BR>';
        else print " Fail<BR>";
        }
-       echo "<h3>CacheEXecute</h3>";
+       echo "<h3>CacheExecute</h3>";
 
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
 
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
-       $rs = &$db->CacheExecute(6,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(6,"select distinct firstname,lastname from ADOXYZ");
        print_r($rs->fields); echo $rs->fetchMode;echo "<br>";
        echo $rs->Fields('firstname');
        
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        print_r($rs->fields); echo $rs->fetchMode;echo "<br>";
        echo $rs->Fields('firstname');
        
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
-       $rs = &$db->CacheExecute(6,"select distinct firstname,lastname from ADOXYZ");
+       $rs = $db->CacheExecute(6,"select distinct firstname,lastname from ADOXYZ");
        print_r($rs->fields);echo "<br>";
        echo $rs->Fields('firstname');
        $db->debug = false;
        print_r($rs->fields);echo "<br>";
        echo $rs->Fields('firstname');
        $db->debug = false;
@@ -1174,26 +1179,26 @@ END Adodb;
        
        $sql = 'select * from ADOXYZ where 0=1';
        echo "<p>**Testing '$sql' (phplens compat 1)</p>";
        
        $sql = 'select * from ADOXYZ where 0=1';
        echo "<p>**Testing '$sql' (phplens compat 1)</p>";
-       $rs = &$db->Execute($sql);
+       $rs = $db->Execute($sql);
        if (!$rs) err( "<b>No recordset returned for '$sql'</b>");
        if (!$rs->FieldCount()) err( "<b>No fields returned for $sql</b>");
        if (!$rs->FetchField(1)) err( "<b>FetchField failed for $sql</b>");
        
        $sql = 'select * from ADOXYZ order by 1';
        echo "<p>**Testing '$sql' (phplens compat 2)</p>";
        if (!$rs) err( "<b>No recordset returned for '$sql'</b>");
        if (!$rs->FieldCount()) err( "<b>No fields returned for $sql</b>");
        if (!$rs->FetchField(1)) err( "<b>FetchField failed for $sql</b>");
        
        $sql = 'select * from ADOXYZ order by 1';
        echo "<p>**Testing '$sql' (phplens compat 2)</p>";
-       $rs = &$db->Execute($sql);
+       $rs = $db->Execute($sql);
        if (!$rs) err( "<b>No recordset returned for '$sql'<br>".$db->ErrorMsg()."</b>");
        
        
        $sql = 'select * from ADOXYZ order by 1,1';
        echo "<p>**Testing '$sql' (phplens compat 3)</p>";
        if (!$rs) err( "<b>No recordset returned for '$sql'<br>".$db->ErrorMsg()."</b>");
        
        
        $sql = 'select * from ADOXYZ order by 1,1';
        echo "<p>**Testing '$sql' (phplens compat 3)</p>";
-       $rs = &$db->Execute($sql);
+       $rs = $db->Execute($sql);
        if (!$rs) err( "<b>No recordset returned for '$sql'<br>".$db->ErrorMsg()."</b>");
        
        
        // Move
        if (!$rs) err( "<b>No recordset returned for '$sql'<br>".$db->ErrorMsg()."</b>");
        
        
        // Move
-       $rs1 = &$db->Execute("select id from ADOXYZ where id <= 2 order by 1");
-       $rs2 = &$db->Execute("select id from ADOXYZ where id = 3 or id = 4 order by 1");
+       $rs1 = $db->Execute("select id from ADOXYZ where id <= 2 order by 1");
+       $rs2 = $db->Execute("select id from ADOXYZ where id = 3 or id = 4 order by 1");
 
        if ($rs1) $rs1->MoveLast();
        if ($rs2) $rs2->MoveLast();
 
        if ($rs1) $rs1->MoveLast();
        if ($rs2) $rs2->MoveLast();
@@ -1223,7 +1228,7 @@ END Adodb;
        echo "<p>";
        
        if (substr($db->dataProvider,0,3) != 'notused') { // used to crash ado
        echo "<p>";
        
        if (substr($db->dataProvider,0,3) != 'notused') { // used to crash ado
-               $sql = "select firstnames from adoxyz";
+               $sql = "select firstnames from ADOXYZ";
                print "<p>Testing execution of illegal statement: <i>$sql</i></p>";
                if ($db->Execute($sql) === false) {
                        print "<p>This returns the following ErrorMsg(): <i>".$db->ErrorMsg()."</i> and ErrorNo(): ".$db->ErrorNo().'</p>';
                print "<p>Testing execution of illegal statement: <i>$sql</i></p>";
                if ($db->Execute($sql) === false) {
                        print "<p>This returns the following ErrorMsg(): <i>".$db->ErrorMsg()."</i> and ErrorNo(): ".$db->ErrorNo().'</p>';
@@ -1234,7 +1239,7 @@ END Adodb;
        
        print "<p>ASSOC TEST 2<br>";
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        
        print "<p>ASSOC TEST 2<br>";
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
-       $rs = $db->query('select * from adoxyz order by id');
+       $rs = $db->query('select * from ADOXYZ order by id');
        if ($ee = $db->ErrorMsg()) {
                Err("Error message=$ee");
        }
        if ($ee = $db->ErrorMsg()) {
                Err("Error message=$ee");
        }
@@ -1255,7 +1260,7 @@ END Adodb;
                print "<b>ADODB_FETCH_BOTH not supported</b> for dataProvider=".$db->dataProvider."<br>";
        } else {
                $ADODB_FETCH_MODE = ADODB_FETCH_BOTH;
                print "<b>ADODB_FETCH_BOTH not supported</b> for dataProvider=".$db->dataProvider."<br>";
        } else {
                $ADODB_FETCH_MODE = ADODB_FETCH_BOTH;
-               $rs = $db->query('select * from adoxyz order by id');
+               $rs = $db->query('select * from ADOXYZ order by id');
                for($i=0;$i<$rs->FieldCount();$i++) 
                { 
                        $fld=$rs->FetchField($i); 
                for($i=0;$i<$rs->FieldCount();$i++) 
                { 
                        $fld=$rs->FetchField($i); 
@@ -1266,7 +1271,7 @@ END Adodb;
        
        print "<p>NUM TEST 2<br>";
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        
        print "<p>NUM TEST 2<br>";
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
-       $rs = $db->query('select * from adoxyz order by id');
+       $rs = $db->query('select * from ADOXYZ order by id');
        for($i=0;$i<$rs->FieldCount();$i++) 
        { 
                $fld=$rs->FetchField($i); 
        for($i=0;$i<$rs->FieldCount();$i++) 
        { 
                $fld=$rs->FetchField($i); 
@@ -1276,7 +1281,7 @@ END Adodb;
        
        print "<p>ASSOC Test of SelectLimit<br>";
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        
        print "<p>ASSOC Test of SelectLimit<br>";
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
-       $rs = $db->selectlimit('select * from adoxyz order by id',3,4);
+       $rs = $db->selectlimit('select * from ADOXYZ order by id',3,4);
        $cnt = 0;
        while ($rs && !$rs->EOF) {
                $cnt += 1;
        $cnt = 0;
        while ($rs && !$rs->EOF) {
                $cnt += 1;
@@ -1293,7 +1298,7 @@ END Adodb;
        if ($db->sysDate) {
                $saved = $db->debug;
                $db->debug = 1;
        if ($db->sysDate) {
                $saved = $db->debug;
                $db->debug = 1;
-               $rs = $db->Execute("select {$db->sysDate} from adoxyz where id=1");
+               $rs = $db->Execute("select {$db->sysDate} from ADOXYZ where id=1");
                if (ADORecordSet::UnixDate(date('Y-m-d')) != $rs->UnixDate($rs->fields[0])) {
                        print "<p><b>Invalid date {$rs->fields[0]}</b></p>";
                } else
                if (ADORecordSet::UnixDate(date('Y-m-d')) != $rs->UnixDate($rs->fields[0])) {
                        print "<p><b>Invalid date {$rs->fields[0]}</b></p>";
                } else
@@ -1309,13 +1314,13 @@ END Adodb;
        print "<p>Test CSV</p>";
        include_once('../toexport.inc.php');
        //$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
        print "<p>Test CSV</p>";
        include_once('../toexport.inc.php');
        //$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
-       $rs = $db->SelectLimit('select id,firstname,lastname,created,\'He, he\' he,\'"\' q  from adoxyz',10);   
+       $rs = $db->SelectLimit('select id,firstname,lastname,created,\'He, he\' he,\'"\' q  from ADOXYZ',10);   
        
        print "<pre>";
        print rs2csv($rs);
        print "</pre>";
        
        
        print "<pre>";
        print rs2csv($rs);
        print "</pre>";
        
-       $rs = $db->SelectLimit('select id,firstname,lastname,created,\'The      "young man", he said\' from adoxyz',10);        
+       $rs = $db->SelectLimit('select id,firstname,lastname,created,\'The      "young man", he said\' from ADOXYZ',10);        
        
        if (PHP_VERSION < 5) {
                print "<pre>";
        
        if (PHP_VERSION < 5) {
                print "<pre>";
@@ -1366,7 +1371,7 @@ END Adodb;
        
        print "<p>Test Replace</p>";
        
        
        print "<p>Test Replace</p>";
        
-       $ret = $db->Replace('adoxyz', 
+       $ret = $db->Replace('ADOXYZ', 
                array('id'=>1,'firstname'=>'Caroline','lastname'=>'Miranda'),
                array('id'),
                $autoq = true);
                array('id'=>1,'firstname'=>'Caroline','lastname'=>'Miranda'),
                array('id'),
                $autoq = true);
@@ -1385,14 +1390,14 @@ END Adodb;
                }
                $ADODB_COUNTRECS = $savec;
        }
                }
                $ADODB_COUNTRECS = $savec;
        }
-       $ret = $db->Replace('adoxyz', 
+       $ret = $db->Replace('ADOXYZ', 
                array('id'=>1000,'firstname'=>'Harun','lastname'=>'Al-Rashid'),
                array('id','firstname'),
                $autoq = true);
        if ($ret != 2) print "<b>Replace failed: </b>";
        print "test A return value=$ret (2 expected) <p>";
        
                array('id'=>1000,'firstname'=>'Harun','lastname'=>'Al-Rashid'),
                array('id','firstname'),
                $autoq = true);
        if ($ret != 2) print "<b>Replace failed: </b>";
        print "test A return value=$ret (2 expected) <p>";
        
-       $ret = $db->Replace('adoxyz', 
+       $ret = $db->Replace('ADOXYZ', 
                array('id'=>1000,'firstname'=>'Sherazade','lastname'=>'Al-Rashid'),
                'id',
                $autoq = true);
                array('id'=>1000,'firstname'=>'Sherazade','lastname'=>'Al-Rashid'),
                'id',
                $autoq = true);
@@ -1403,7 +1408,7 @@ END Adodb;
        
        print "<h3>rs2rs Test</h3>";
        
        
        print "<h3>rs2rs Test</h3>";
        
-       $rs = $db->Execute('select * from adoxyz where id>= 1 order by id');
+       $rs = $db->Execute('select * from ADOXYZ where id>= 1 order by id');
        $rs = $db->_rs2rs($rs);
        $rs->valueX = 'X';
        $rs->MoveNext();
        $rs = $db->_rs2rs($rs);
        $rs->valueX = 'X';
        $rs->MoveNext();
@@ -1417,7 +1422,7 @@ END Adodb;
        $db->debug=true;
        $sql = PivotTableSQL(
                $db,                    # adodb connection
        $db->debug=true;
        $sql = PivotTableSQL(
                $db,                    # adodb connection
-               'adoxyz',               # tables
+               'ADOXYZ',               # tables
                'firstname',    # row fields
                'lastname',             # column fields 
                false,                  # join
                'firstname',    # row fields
                'lastname',             # column fields 
                false,                  # join
@@ -1438,7 +1443,7 @@ END Adodb;
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        
        include_once "PEAR.php";
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
        
        include_once "PEAR.php";
-       $rs = $db->query('select * from adoxyz where id>0 and id<10 order by id');
+       $rs = $db->query('select * from ADOXYZ where id>0 and id<10 order by id');
        
        $i = 0;
        if ($rs && !$rs->EOF) {
        
        $i = 0;
        if ($rs && !$rs->EOF) {
@@ -1456,12 +1461,12 @@ END Adodb;
        }
        
        
        }
        
        
-       if ($i != $db->GetOne('select count(*) from adoxyz where id>0 and id<10')) {
+       if ($i != $db->GetOne('select count(*) from ADOXYZ where id>0 and id<10')) {
                print "<p><b>PEAR DB emulation error 1.1 EOF ($i)</b></p>";
                $pear = false;
        }
        
                print "<p><b>PEAR DB emulation error 1.1 EOF ($i)</b></p>";
                $pear = false;
        }
        
-       $rs = $db->limitQuery('select * from adoxyz where id>0 order by id',$i=3,$top=3);
+       $rs = $db->limitQuery('select * from ADOXYZ where id>0 order by id',$i=3,$top=3);
        $i2 = $i;
        if ($rs && !$rs->EOF) {
 
        $i2 = $i;
        if ($rs && !$rs->EOF) {
 
@@ -1487,7 +1492,7 @@ END Adodb;
        flush();
 
        
        flush();
 
        
-       $rs = $db->SelectLimit("select ".$db->sysDate." from adoxyz",1);
+       $rs = $db->SelectLimit("select ".$db->sysDate." from ADOXYZ",1);
        $date = $rs->fields[0];
        if (!$date) Err("Bad sysDate");
        else {
        $date = $rs->fields[0];
        if (!$date) Err("Bad sysDate");
        else {
@@ -1497,9 +1502,9 @@ END Adodb;
        }
        $db->debug=1;
        if ($db->dataProvider == 'oci8') 
        }
        $db->debug=1;
        if ($db->dataProvider == 'oci8') 
-               $rs = $db->SelectLimit("select to_char(".$db->sysTimeStamp.",'YYYY-MM-DD HH24:MI:SS') from adoxyz",1);
+               $rs = $db->SelectLimit("select to_char(".$db->sysTimeStamp.",'YYYY-MM-DD HH24:MI:SS') from ADOXYZ",1);
        else 
        else 
-               $rs = $db->SelectLimit("select ".$db->sysTimeStamp." from adoxyz",1);
+               $rs = $db->SelectLimit("select ".$db->sysTimeStamp." from ADOXYZ",1);
        $date = $rs->fields[0];
        if (!$date) Err("Bad sysTimeStamp");
        else {
        $date = $rs->fields[0];
        if (!$date) Err("Bad sysTimeStamp");
        else {
@@ -1572,7 +1577,7 @@ END Adodb;
        if ($metae !== DB_ERROR_NOSUCHTABLE) print "<p><b>MetaError=".$metae." wrong</b>, should be ".DB_ERROR_NOSUCHTABLE."</p>";
        else print "<p>MetaError ok (".DB_ERROR_NOSUCHTABLE."): ".$db->MetaErrorMsg($metae)."</p>";
        if ($TESTERRS != 1) print "<b>raiseErrorFn select nowhere failed</b><br>";
        if ($metae !== DB_ERROR_NOSUCHTABLE) print "<p><b>MetaError=".$metae." wrong</b>, should be ".DB_ERROR_NOSUCHTABLE."</p>";
        else print "<p>MetaError ok (".DB_ERROR_NOSUCHTABLE."): ".$db->MetaErrorMsg($metae)."</p>";
        if ($TESTERRS != 1) print "<b>raiseErrorFn select nowhere failed</b><br>";
-       $rs = $db->Execute('select * from adoxyz');
+       $rs = $db->Execute('select * from ADOXYZ');
        if ($debugerr) print " Move";
        $rs->Move(100);
        $rs->_queryID = false;
        if ($debugerr) print " Move";
        $rs->Move(100);
        $rs->_queryID = false;
@@ -1585,17 +1590,17 @@ END Adodb;
        
        print "<p>SetFetchMode() tests</p>";
        $db->SetFetchMode(ADODB_FETCH_ASSOC);
        
        print "<p>SetFetchMode() tests</p>";
        $db->SetFetchMode(ADODB_FETCH_ASSOC);
-       $rs = $db->SelectLimit('select firstname from adoxyz',1);
+       $rs = $db->SelectLimit('select firstname from ADOXYZ',1);
        if (!isset($rs->fields['firstname'])) Err("BAD FETCH ASSOC");
        
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;    
        if (!isset($rs->fields['firstname'])) Err("BAD FETCH ASSOC");
        
        $ADODB_FETCH_MODE = ADODB_FETCH_NUM;    
-       $rs = $db->SelectLimit('select firstname from adoxyz',1);
+       $rs = $db->SelectLimit('select firstname from ADOXYZ',1);
        //var_dump($rs->fields);
        if (!isset($rs->fields['firstname'])) Err("BAD FETCH ASSOC");
        
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;  
        $db->SetFetchMode(ADODB_FETCH_NUM);
        //var_dump($rs->fields);
        if (!isset($rs->fields['firstname'])) Err("BAD FETCH ASSOC");
        
        $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;  
        $db->SetFetchMode(ADODB_FETCH_NUM);
-       $rs = $db->SelectLimit('select firstname from adoxyz',1);
+       $rs = $db->SelectLimit('select firstname from ADOXYZ',1);
        if (!isset($rs->fields[0])) Err("BAD FETCH NUM");
        
        flush();
        if (!isset($rs->fields[0])) Err("BAD FETCH NUM");
        
        flush();
@@ -1733,6 +1738,6 @@ include_once('../adodb-time.inc.php');
 if (isset($_GET['time'])) adodb_date_test();
 
 ?>
 if (isset($_GET['time'])) adodb_date_test();
 
 ?>
-<p><i>ADODB Database Library  (c) 2000-2006 John Lim. All rights reserved. Released under BSD and LGPL, PHP <?php echo PHP_VERSION ?>.</i></p>
+<p><i>ADODB Database Library  (c) 2000-2007 John Lim. All rights reserved. Released under BSD and LGPL, PHP <?php echo PHP_VERSION ?>.</i></p>
 </body>
 </html>
 </body>
 </html>