", "\n", $subject); //文字列の置換 ?> [変更用ﾌｫｰﾑ]
name ※ローマ字頭3文字で
subjec
from
date ※2/20もしくは2008/2/20の形式で書いて
time ※18:00の形式で書いて
to
date
time
">

$seqno_max){$seqno_max = $seqno2;} } $seqno = $seqno_max + 1; } //配列要素を文字列により連結 $input_msg = implode("\t", array($seqno,$name,$fromdate,$fromtime,$todate,$totime,$subject,$delete,$host)); //★string implode ( string glue, array pieces )関数・・・全ての配列要素の順序を変えずに、各要素間の引数glue 文字列を挟んで、1つの文字列として返します。 $input_msg .= "\n"; //データ書き込み for($i = 0; $i < $msg_num; $i++){ list($seqno2,$name2,$fromdate2,$fromtime2,$todate2,$totime2,$subject2,$delete2,$host2) = split( "\t", $message[$i]); if( $fromdate2 > $fromdate && $l_flg_put == ""){ fputs($fp, $input_msg); //★int fputs ( int fp, string str [ , int length ] )関数・・・引数string の内容を、引数fp が指しているファイル・ストリームに書き込みます。length パラメータが指定されている場合、length バイト数分の書き込みが完了、又はstring が終わりに達した場合のいずれかにより書き込みは中止されます。 $l_flg_put = "x"; } fputs($fp, $message[$i]); } if( $l_flg_put == ""){ fputs($fp, $input_msg);} unset($message); return; } //-------------------------------------------------------// // 日付項目登録編集 //-------------------------------------------------------// function f_edit_date($p_date){ if($p_date == null){return(null);} if(strlen($p_date) > 10){print "日付項目長が不正です(1)(".strlen($p_date).")";exit;} //長すぎる場合 if(strlen($p_date) < 3 ){print "日付項目長が不正です(2)(".strlen($p_date).")";exit;} //短すぎる場合 //項目分割 list($k1,$k2,$k3) = split("/",$p_date); //"/"が存在しなかった場合エラー if($k1 == null or $k2 == null){ print "日付形式が違います";exit;} //項目属性整理 $sy_year = '2008'; //当年　(要追加修正) if($k3 == null){ //年未入力の場合 $y = $sy_year; $m = $k1; $d = $k2; }else{ //年入力の場合 $y = $k1; $m = $k2; $d = $k3; } //日付チェック if (!checkdate($m, $d, $y)) { print "${y}年${m}月${d}日は日付として無効です。
\n";exit; } if(strlen($m) == 1){$m = "0".$m;} if(strlen($d) == 1){$d = "0".$d;} $p_return = $y."/".$m."/".$d; return($p_return); } //-------------------------------------------------------// // 日付項目出力編集 //-------------------------------------------------------// function f_make_date($p_date){ if($p_date <> ""){ list($year,$month,$date) = split( "/", $p_date); $weekday = jddayofweek (cal_to_jd(CAL_GREGORIAN, $month,$date,$year),2); $p_return = $month."/".$date."
(".$weekday.")"; } return($p_return); } //-------------------------------------------------------// // レコード出力 //-------------------------------------------------------// function f_report($p_mode) { global $data_file; global $now; ?> [連絡事項]
文字化け解消しました。

[ｽｹｼﾞｭｰﾙ]

who	from	to	subject\n"; if($p_mode == "x"){print "	bottun";} //記事表示部を生成 for($i = 0; $i < $msg_count; $i++){ chop($message[$i]); list($seqno,$name,$fromdate,$fromtime,$todate,$totime,$subject,$delete,$host) = split( "\t", $message[$i]); if($delete == "x"){continue;} if($delete == "x\n"){continue;} if($seqno == "\n"){continue;} if($seqno == ""){continue;} //if($now + 30 = $fromdate){continue;} $fromdate = f_make_date($fromdate); $todate = f_make_date($todate); print "
$name"; if($fromdate <> "" and $todate <> "" and $fromdate <> $todate) { print "	$fromdate	$todate	$subject"; }else{ print "	$fromdate		$subject"; } if($p_mode == "x"){ ?>	">	"> "" and $fromdate <> ""){$fromtime = "-";} if($fromtime <> "" and $totime == "" and $todate <> "") {$totime = "-";} if($totime <> "" and $totime <> "" ){ print "
	$fromtime	$totime\n"; }else{ print "
$fromtime$totime\n"; } } ?>

■共有ｽｹｼﾞｭｰﾙ■
□ 予定照会
□ 入力ﾌｫｰﾑ
□ 削除/変更画面
□ ログオフ

Welcome to ABAP database !!