PHP Classes
elePHPant
Icontem

File: test_create.php

Recommend this page to a friend!
Stumble It! Stumble It! Bookmark in del.icio.us Bookmark in del.icio.us
  Classes of Erwin Kooi  >  PHPXBase  >  test_create.php  >  Download  
File: test_create.php
Role: Example script
Content type: text/plain
Description: test create function
Class: PHPXBase
Access dbf/foxpro files without PHP ext.
Author: By
Last change: description change
Date: 9 years ago
Size: 2,057 bytes
 

Contents

Class file image Download
<?
/**
* ----------------------------------------------------------------
* XBase
* test_create.php
*
* Developer : Erwin Kooi
* released at : Jan 2006
* last modified by : Erwin Kooi
* date modified : Jan 2006
*
* Info? Mail to info@cyane.nl
*
* --------------------------------------------------------------
*
* Demonstration how to create a dbf from scratch
*
**/

    /* load the required classes */
   
require_once "Column.class.php";
    require_once
"Record.class.php";
    require_once
"Table.class.php";
    require_once
"WritableTable.class.php";

   
/* sample data */
   
$fields = array(
        array(
"bool" , DBFFIELD_TYPE_LOGICAL),
        array(
"memo" , DBFFIELD_TYPE_MEMO),
        array(
"date" , DBFFIELD_TYPE_DATE),
        array(
"number" , DBFFIELD_TYPE_NUMERIC, 3, 0),
        array(
"string" , DBFFIELD_TYPE_CHAR, 50),
    );
   
   
/* create a new table */
   
$tableNew = XBaseWritableTable::create("test/created.dbf",$fields);
   
   
/* insert some data */
   
$r =& $tableNew->appendRecord();
   
$r->setObjectByName("bool",true);
   
$r->setObjectByName("date",time());
   
$r->setObjectByName("number",123);
   
$r->setObjectByName("string","String one");
   
$tableNew->writeRecord();
   
   
$r =& $tableNew->appendRecord();
   
$r->setObjectByName("bool",false);
   
$r->setObjectByName("date",time()/2);
   
$r->setObjectByName("number",321);
   
$r->setObjectByName("string","String two");
   
$tableNew->writeRecord();

   
$r =& $tableNew->appendRecord();
   
$r->setObjectByName("bool",true);
   
$r->setObjectByName("date",time()-(60*60*24));
   
$r->setObjectByName("number",111);
   
$r->setObjectByName("string","String trio");
   
$tableNew->writeRecord();
   
   
/* close the table */
   
$tableNew->close();
   
   
/* open created file*/
   
$table =& new XBaseTable("test/created.dbf");
   
$table->open();

   
/* xml output */
   
echo $table->toHTML();
    echo
"<pre>\n";
    echo
htmlspecialchars($table->toXML());
    echo
"</pre>\n";

   
/* close the table */
   
$table->close();
?>