OCIFetchStatement

<?php
/* OCIFetchStatement példa - mbritton@verinet.com (990624) */

$conn = OCILogon("scott","tiger");

$stmt = OCIParse($conn,"select * from dolgozok");

OCIExecute($stmt);

$sorokszama = OCIFetchStatement($stmt, $tabla);
if ( $sorokszama > 0 ) {
   print "<TABLE BORDER=\"1\">\n";
   print "<TR>\n";
   while ( list( $kulcs, $ertek ) = each( $tabla ) ) {
      print "<TH>$kulcs</TH>\n";
   }
   print "</TR>\n";
   
   for ( $i = 0; $i < $sorokszama; $i++ ) {
      reset($tabla);
      print "<TR>\n";
      while ( $mezo = each($tabla) ) {   
         $adat = $mezo['value'];
         print "<TD>$adat[$i]</TD>\n";
      }
      print "</TR>\n";
   }
   print "</TABLE>\n";
} else {
   echo "Nincs adat a táblában<BR>\n";
}      
print "$sorokszama sort sikerült lekérdezni<BR>\n";
 
OCIFreeStatement($stmt);
OCILogoff($conn);
?>