[PHP/dBase] Kolomnamen onder php 4.3?

[MichaelDell]

Ik werk hier met PHP 4.3.0. Nu wil ik van een dBase bestand de kolomnamen hebben, hier bestaat in PHP 5 een functie voor: dbase_get_header_info(). Weet iemand een oplossing die te gebruiken is onder 4.3.0?

[dsalden]

Heb net eens eventjes op php.net gekeken, daar ben ik bij volgende code uitgekomen om header info op te zoeken met php versie kleiner dan 5.

PHP:

<?php
function get_dbf_header($dbfname) {
   $fdbf = fopen($dbfname,'r');

   $dbfhdrarr = array();
   $buff32 = array();
   $i = 1;
   $goon = true;

   while ($goon) {
     if (!feof($fdbf)) {
         $buff32 = fread($fdbf,32);
         if ($i > 1) {
           if (substr($buff32,0,1) == chr(13)) {
               $goon = false;
           } else {
               $pos = strpos(substr($buff32,0,10),chr(0));
               $pos = ($pos == 0?10:$pos);

               $fieldname = substr($buff32,0,$pos);
               $fieldtype = substr($buff32,11,1);
               $fieldlen = ord(substr($buff32,16,1));
               $fielddec = ord(substr($buff32,17,1));

               array_push($dbfhdrarr, array($fieldname,$fieldtype,$fieldlen,$fielddec));
           }
         }
         $i++;
     } else {
         $goon = false;
     }
   }

   fclose($fdbf);
   return($dbfhdrarr);
}

$arr = get_dbf_header('/data/file.dbf');
print_r($arr);
?>

Ik weet niet of dit gaat werken maar je kan altijd eens proberen.

[MichaelDell]

Geweldig, werkt perfect, dank je wel!