i/qslt.php
by webproger on 2023-09-21
ᐥqslt() SELECTᐥ
<?php
function qslt() {
    // qslt('table','column'[,'where','value'],$DBGGNG) $DBGGNG:true/false
    global $d_link;
    $qry  = "SELECT ".func_get_arg(1)." FROM ".func_get_arg(0);
    for($n=2; $n<func_num_args()-1; $n+=2) {
        if($n==2) $qry .= " WHERE ";
        $qry .= func_get_arg($n);
        switch (gettype(func_get_arg($n+1))){
            case "NULL"   : $qry .= " IS NULL";                              break;
            case "boolean": $qry .= " =  ".func_get_arg($n+1);               break;
            case "integer": $qry .= " =  ".func_get_arg($n+1);               break;
            case "double" : $qry .= " =  ".func_get_arg($n+1);               break;
            case "string" : $qry .= " LIKE BINARY '".func_get_arg($n+1)."'"; break;
        }
        if(($n+2)<func_num_args()-1) $qry .= " AND ";
    }
    // for debugging
    if( (func_num_args()%2)!=0 AND func_get_arg(func_num_args()-1)===true ) echo "==>".$qry."<==";
    $rslt = @mysql_query($qry,$d_link);
    if(func_get_arg(1)=="*") return mysql_fetch_array($rslt);
    elseif($row=@mysql_fetch_row($rslt)) return $row[0];
    else return false;
}
?>