<?php i18n_http_output("SJIS"); ?>
<HTML>
<HEAD>
    <meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
    <title>DB Exsample #03 : Insert & Select</title>
</HEAD>
<BODY>
    <H2>DB Exsample #03 : Insert & Select</H2>
    テーブルをレコードを追加し内容を表示します。<BR>
    Pear DBクラスライブラリを使用します。<BR>
    <BR>

    <?php
        
// ● Pead DBクラスライブラリをインクルード
        
ini_set("include_path",ini_get("include_path"));
        require_once 
'DB.php';    

        
// ● 変数セット
        // DSNを設定
        
$dsn "pgsql://fukaya: @localhost/ftdemo";
        
        
// ● DBへ接続
        
$db DB::connect$dsn );

        
// エラーチェック
        
if (DB::isError$db )) {
            echo  
"DB接続エラー : " DB::errorMessage$db ) . "<BR>";
        }else{
            echo 
"DB接続成功 : " $db->toString() . "<BR>";
        }

        
// ● レコード追加
        // レコード追加のSQL文
        
$sql "INSERT INTO t_ex01 ( f_date , f_ipadr )";
        
$sql .= "values (" date("'Y/m/d H:i:s'",time()) . ",'" getenv(REMOTE_ADDR) . "')";
        
        
// クエリー実行
        
$res $db->query$sql );

        
// エラー処理 (なんか常に DB_OKなような気がする)
        
if ( $res == DB_OK ) {
            echo 
"レコード追加成功<BR>";
        }else{
            echo 
"レコード追加失敗 : " .  DB::errorMessage$res ) . "<BR>";
        }

        
// ● レコード内容表示
        // レコード内容表示のSQL文
        
$sql "SELECT f_date,f_ipadr FROM t_ex01 ORDER BY f_date";
                
        
// クエリー実行 ($resには DB_resultが返る)
        
$res $db->query$sql );

        
// エラー処理 (どうやってもDB::isErrorがtrueにならないなあ)
        
if ( !DB::isError($res) ) {
            echo 
"レコード検索成功<BR>\n";
        }else{
            echo 
"レコード検索失敗 : " .  DB::errorMessage$res ) . "<BR>";
        }


        
// 取得したResultSet内容を表示
        
while ($row $res->fetchRowDB_FETCHMODE_ASSOC )  ) {
            echo 
"日時:" $row["f_date"] . " / IPアドレス:" $row["f_ipadr"] . "<BR>\n";
        }
        
        
// ResultSet開放
        
$res->free();


        
// ● DB接続終了
        
$db->disconnect();
        echo 
"DB接続終了<BR>"
    
?>

</BODY>
</HTML>