forked from extern/egroupware
32 lines
761 B
PHP
32 lines
761 B
PHP
|
<code>
|
||
|
|
<?php
|
||
|
|
/*
|
||
|
|
V3.94 13 Oct 2003 (c) 2000-2003 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.
|
||
|
|
Set tabs to 8.
|
||
|
|
*/
|
||
|
|
#
|
||
|
|
# Code to test Move
|
||
|
|
#
|
||
|
|
include("../adodb.inc.php");
|
||
|
|
|
||
|
|
$c1 = &ADONewConnection('postgres');
|
||
|
|
if (!$c1->PConnect("susetikus","tester","test","test"))
|
||
|
|
die("Cannot connect to database");
|
||
|
|
|
||
|
|
# select * from last table in DB
|
||
|
|
$rs = $c1->Execute("select * from adoxyz order by 1");
|
||
|
|
|
||
|
|
$i = 0;
|
||
|
|
$max = $rs->RecordCount();
|
||
|
|
if ($max == -1) "RecordCount returns -1<br>";
|
||
|
|
while (!$rs->EOF and $i < $max) {
|
||
|
|
$rs->Move($i);
|
||
|
|
print_r( $rs->fields);
|
||
|
|
print '<BR>';
|
||
|
|
$i++;
|
||
|
|
}
|
||
|
|
?>
|
||
|
|
</code>
|