getMessage()); return $mdb2; } function mdb2_res_table($res) { $no_columns = $res->numCols(); $columns = $res->getColumnNames(); //print_r($columns); if ($no_columns == 0) return; ?> $value) { ?>fetchRow(MDB2_FETCHMODE_ORDERED)) { ?>

NULL'); else echo($data); ?>

seek(); // reset row pointer } // format characters // %% -> % // %q -> string to be escaped, must already be insides 's in $format // %w -> string to be escaped, must already be insides 's in $format, also escapes wildcard characters // %i -> positive integer function mdb2_vprintf($mdb2, $format, $args) { $out = ''; $arg = 0; while (($pos = strpos($format, '%')) !== FALSE) { $out .= substr($format, 0, $pos); switch ($format[$pos + 1]) { case '%': $out .= '%'; break; case 'q': if (count($args) <= $arg) fatal_error('te weinig argumenten'); $out .= $mdb2->escape($args[$arg]); $arg++; break; case 'w': if (count($args) <= $arg) fatal_error('te weinig argumenten'); $out .= $mdb2->escape($args[$arg], true); $arg++; break; case 'i': if (count($args) <= $arg) fatal_error('te weinig argumenten'); $val = (int)$args[$arg]; if ($val == NULL) { $out .= 'NULL'; } else { if ($val != $args[$arg]) fatal_error('SQL argument is geen integer'); if ($val <= 0) fatal_error('SQL argument is geen positieve integer: '.$val); $out .= $val; } $arg++; break; default: fatal_error('onzinnig format character'); break; } $format = substr($format, $pos + 2); } if ($arg != count($args)) fatal_error('te veel argumenten voor format string'); //echo($out.$format."\n"); return $out.$format; } function mdb2_vquery($mdb2, $format, $args) { $res =& $mdb2->query(mdb2_vprintf($mdb2, $format, $args)); if (PEAR::isError($res)) { $errorInfo = $mdb2->errorInfo($res); fatal_error($res->getMessage().': '.$errorInfo[2]); } return $res; } function mdb2_query($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); return mdb2_vquery($mdb2, $format, $args); } function mdb2_vexec_error($mdb2, $err, $format, $args) { $affected =& $mdb2->exec(mdb2_vprintf($mdb2, $format, $args)); if (PEAR::isError($affected)) { if (PEAR::isError($affected, $err)) return false; else { $errorInfo = $mdb2->errorInfo($affected); fatal_error($affected->getMessage().': '.$errorInfo[2]); } } return true; } function mdb2_exec_error($mdb2, $err, $format) { $args = func_get_args(); array_shift($args); array_shift($args); array_shift($args); return mdb2_vexec_error($mdb2, $err, $format, $args); } function mdb2_vexec($mdb2, $format, $args) { $affected =& $mdb2->query(mdb2_vprintf($mdb2, $format, $args)); if (PEAR::isError($affected)) { $errorInfo = $mdb2->errorInfo($affected); fatal_error($affected->getMessage().': '.$errorInfo[2]); } } function mdb2_exec($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); mdb2_vexec($mdb2, $format, $args); } function mdb2_vsingle_row($mdb2, $mode, $format, $args) { $res = mdb2_vquery($mdb2, $format, $args); $array = $res->fetchRow($mode); $res->free(); return $array; } function mdb2_vall($mdb2, $mode, $rekey, $force_array, $group, $format, $args) { $res = mdb2_vquery($mdb2, $format, $args); $array = $res->fetchAll($mode, $rekey, $force_array, $group); $res->free(); return $array; } function mdb2_all_assoc_rekey($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); return mdb2_vall($mdb2, MDB2_FETCHMODE_ASSOC, true, false, false, $format, $args); } function mdb2_all_ordered_rekey($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); return mdb2_vall($mdb2, MDB2_FETCHMODE_ORDERED, true, false, false, $format, $args); } function mdb2_col($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); $res = mdb2_vquery($mdb2, $format, $args); $col = $res->fetchCol(); $res->free(); return $col; } function mdb2_single_row($mdb2, $mode, $format) { $args = func_get_args(); array_shift($args); array_shift($args); array_shift($args); return mdb2_vsingle_row($mdb2, $mode, $format, $args); } function mdb2_single_array($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); return mdb2_vsingle_row($mdb2, MDB2_FETCHMODE_ORDERED, $format, $args); } function mdb2_single_assoc($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); return mdb2_vsingle_row($mdb2, MDB2_FETCHMODE_ASSOC, $format, $args); } function mdb2_single_val($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); $res = mdb2_vquery($mdb2, $format, $args); $array = $res->fetchRow(); $res->free(); if (isset($array[0])) return $array[0]; else return NULL; } ?>