スクリプト評価スレッド【PHP】

[0001 名無しさん＠お腹いっぱい。 2001/05/18(金) 19:01 ID:???]

2chに自分が作ったスクリプトをさらし、
評価してもらうことにより技術の向上を図るスレ。

[0002 名無しさん＠お腹いっぱい。 2001/05/22(火) 17:56 ID:???]

<?php phpinfo(); ?>

[0003 名無しさん＠お腹いっぱい。 2001/05/22(火) 17:55 ID:???]

<?php phpinfo(); ?>

[0004 名無しさん＠お腹いっぱい。 2001/05/22(火) 18:31 ID:???]

>>2-3
厨房はこれ見て騒ぐんじゃねーぞ。

[0005 unifriendry 2001/05/24(木) 19:01 ID:???]

＞４
・・・・ハァ？？？？

[0006 名無しさん＠お腹いっぱい。 2001/05/25(金) 18:44 ID:???]

GET形式のデータを解析する関数
-----------------------------
function get_decode(){
$query = explode('&',getenv('QUERY_STRING'));
$i=0;
while($query[$i]){
list($name,$value) = explode('=',$query[$i]);
$name = urldecode($name);
$value = urldecode($value);
eval('$'.$name.'='.$value.';');
$i++;
}

[0007 梨 2001/05/30(水) 13:29 ID:???]

>>6
デコードされた$nameに、変数名には使えない文字が来るのでは？

$HTTP_GET_VARSじゃだめなの？

[0008 6 2001/05/30(水) 18:21 ID:???]

すんまそん。
-----------------------function get_decode(){
$query = explode('&',getenv('QUERY_STRING'));
$i=0;
while($query[$i]){
list($name,$value) = explode('=',$query[$i]);
$name = urldecode($name);
$value = urldecode($value);
eval('$query{'.$name.'}='.$value.';');
$i++;
}
}

[0009 Perl厨房 2001/05/30(水) 18:27 ID:???]

>>8
evalの必要あんの？

[0010 梨 2001/05/31(木) 14:54 ID:???]

>>8

<?php track_vars
function get_decode(){
　while(list($key, $val) = each($HTTP_GET_VARS)) {
　　$query[urldecode($key)] = urldecode($val);
　}
}
?>

これでいいんでないの？
ハッシュのキーに関数書けたかどうか忘れたけど。

// PHP書くなら、Perlから離れた方がいいよ。
// PHP4には、「Perlらしい」使いやすさは無いと思う。

[0011 & ◇aKbxr9Z2 02/01/18 21:09 ID:???]

　　 ∧＿∧　　／￣￣￣￣￣
　　（　´_ゝ`）＜　てすと
　　（　　　　） 　＼＿＿＿＿＿
　　｜ ｜　|
　　（_＿）＿)

[0012 ◇ 02/01/18 21:16 ID:???]

>>11
この板でだせーAA使うんじゃねぇ、ヒッキー板にでも逝ってな！

[0013 名無しさん＠お腹いっぱい。 02/01/18 23:40 ID:???]

（　´._ゝ`）　へー　

[0014 名無しさん＠お腹いっぱい。 02/01/19 15:52 ID:???]

>>12
何言ってんだよ。
11のAAは2chのマスコットキャラの一つじゃないか。
それが嫌だったら２ちゃんには来ないことだな。
まあお前はmegabbsにでも逝ってなさいってこった。

[0015 nobodyさん 02/03/06 19:41 ID:???]

　　 ∧＿∧　　／￣￣￣￣￣
　　（　´_ゝ`）＜　てすつ
　　（　　　　） 　＼＿＿＿＿＿
　　｜ ｜　|
　　（_＿）＿)

[0016 nobodyさん 02/03/06 23:32 ID:???]

function get_file($filename){
ob_start();
readfile($filename);
$value = ob_get_contents();
ob_end_clean();
return $value;
}
テキストファイルの中身を取得したい場合fopenするよりかなり軽い

[0017 nobodyさん 02/03/07 23:02 ID:WKzEIlFf]

class db{
var $err_func;
var $dbc;
function db($err_func = "")
{
$this->err_func = $err_func;
}
function connect($dsn)
{
if(DB::isError($dbc = DB::connect($dsn))){
$this->error(DB::errorMessage($dbc));
}
}
function query($sql)
{
if(DB::isError($res = $this->query($sql))){
$this->error(DB::errorMessage($res));
return FALSE;
}else{
return $res;
}
}
function error($err_msg)
{
$this->dbc->disconnect();
if($this->err_func){
$this->err_func();
}else{
die($err_msg);
}
}
}

[0018 nobodyさん 02/03/07 23:04 ID:WKzEIlFf]

ミスった
$this->query($sql)じゃなく$this->dbc->query($sql)
だ

[0019 nobodyさん 02/03/14 02:57 ID:80hRLeB+]

function dsp_option ($array, $selected) {
foreach ($array as $key => $value) {
if (is_array($selected)) { // multiple
if (in_array($key, $selected)) echo "<option value=\"{$key}\" selected>";
else echo "<option value=\"{$key}\">";
} elseif ($selected == $key) echo "<option value=\"{$key}\" selected>";
else echo "<option value=\"{$key}\">";
echo "{$value}</option>\n";
}
}

$array を <select> <option> 表示する関数

[0020 1-1000getter ◆9Ce54OonTI 02/10/14 02:56 ID:???]

天才な漏れが>>20ゲット！！
http://ex.2ch.net/test/read.cgi/entrance/1034528858/

>>19
読みにくい。
分岐ごとに出力するにしてもselectedだけ出せばいいんじゃないの？

[0021 山崎渉 03/01/15 13:49 ID:???]

（＾＾）