(バージョン情報なし。おそらく SVN 版にしか存在しないでしょう)
PDO_4D の例 — PDO_4D の例
この例は、4D SQL サーバへの接続からクエリの実行、 データの読み込み、そしてサーバからの切断までの方法を示したものです。
例1 PDO_4D の基本例
<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$user = 'test';
$pass = 'test';
// 4D SQL サーバに接続します
$db = new PDO($dsn, $user, $pass);
try {
$db->exec('CREATE TABLE test(id varCHAR(1) NOT NULL, val VARCHAR(10))');
} catch (PDOException $e) {
die("Erreur 4D : " . $e->getMessage());
}
$db->exec("INSERT INTO test VALUES('A', 'A')");
$db->exec("INSERT INTO test VALUES('B', 'A')");
$db->exec("INSERT INTO test VALUES('C', 'C')");
$stmt = $db->prepare('SELECT id, val from test');
$stmt->execute();
print_r($stmt->fetchAll());
unset($stmt);
unset($db);
?>
上の例の出力は以下となります。
Array ( [0] => Array ( [ID] => A [0] => A [VAL] => B [1] => B ) [1] => Array ( [ID] => C [0] => C [VAL] => D [1] => D ) [2] => Array ( [ID] => E [0] => E [VAL] => F [1] => F ) )
この例は、4D 言語でクエリを実行してその結果を PDO_4D で読み込む方法を示すものです。
例2 pdo_4d からの 4D 言語へのアクセス
method という 4D メソッドを準備します。 メソッドのプロパティで、オプション Available via SQL をチェックしておくことを忘れないようにしましょう。 4D のコードは次のようになります。
C_TEXTE($0) $0:=Version application(*);
この 4D メソッドを使うための PHP のコードは以下のとおりです。
<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$user = 'test';
$pass = 'test';
// 4D SQL サーバに接続します
$db = new PDO($dsn, $user, $pass);
$stmt = $db->prepare('SELECT {FN method() AS VARCHAR } FROM _USER_SCHEMAS LIMIT 1');
$stmt->execute();
print_r($stmt->fetchAll());
unset($stmt);
unset($db);
?>
上の例の出力は以下となります。
( [0] => Array ( [<expression>] => F0011140 [0] => F0011140 ) )
例3 4D テーブル名のエスケープ
この例では、4D SQL クエリ内の文字をエスケープする方法を示します。
<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$user = 'test';
$pass = 'test';
// 4D SQL サーバに接続します
$db = new PDO($dsn, $user, $pass);
$objects = array('[',']','[]','][','[[',']]','[[[',']]]','TBL ]]32[23');
foreach($objects as $id => $object) {
$object = str_replace(']',']]', $object);
print "$object\n";
$db->exec('CREATE TABLE IF NOT EXISTS ['.$object.'](['.$object.'] FLOAT)');
$req = "INSERT INTO [$object] ([$object]) VALUES ($id);";
$db->query($req);
$q = $db->prepare("SELECT [$object] FROM [$object]");
$q->execute();
$x[] = $q->fetch(PDO::FETCH_NUM);
$db->exec('DROP TABLE ['.$object.'];');
}
?>
上の例の出力は以下となります。
[ ]] []] ]][ [[ ]]]] [[[ ]]]]]] TBL ]]]]32[23