yyyy0m0d function TransDate1to2( $arg_editdate ) { $tmp1 = strrpos( $arg_editdate, "/" ); $tmp2 = strlen( $arg_editdate ); return substr( $arg_editdate, 0, 4 ).sprintf("%02d",substr( $arg_editdate, 5, $tmp1 - 5 )).sprintf("%02d",substr( $arg_editdate, $tmp1 + 1, $tmp2 - $tmp1 - 1 ) ); } //1記事データ取得ルーチン function GetArticleData( $arg_fn, $arg_no ) { $fp = fopen( $arg_fn, "r" ); $r1 = ERRSTR; while( $fdat = fgetcsv( $fp, FLLEN) ) { if( $fdat[0] == $arg_no ) { $r1 = $fdat[1]; $r2 = $fdat[2]; $r3 = $fdat[3]; $r4 = $fdat[4]; $r5 = $fdat[5]; $r6 = $fdat[6]; $r7 = $fdat[7]; $r8 = $fdat[8]; $r9 = $fdat[9]; $r10 = $fdat[10]; } } fclose( $fp ); return array ( $r1, $r2, $r3, $r4, $r5, $r6, $r7, $r8, $r9, $r10 ); } //転送後URL作成ルーチン function MakeNewURL( $arg_thr, $arg_no, $arg_articledate) { if( $arg_thr === "l02" ) { return "php/jvcphp_epdisp_old.php?ThreadName=".$arg_thr."&ArticleNo=".$arg_no; } $ret = ""; switch ( $arg_thr ) { case 'a01': $ret = 'jp/projects/afghanistan-report/'; break; case 'a02': $ret = 'jp/projects/afghanistan-afghanwatch/'; break; case 'm01': $ret = 'jp/projects/iraq-report/'; break; case 'm02': $ret = 'jp/projects/iraq-iraqwatch/'; break; case 'c01': $ret = 'jp/projects/cambodia-fieldreport/'; break; case 'd01': $ret = 'jp/projects/sudan-diary/'; break; case 't02': $ret = 'jp/projects/thailand-studytour/'; break; case 't03': $ret = 'jp/projects/thailand-village/'; break; case 't04': $ret = 'jp/projects/thailand-burma/'; break; case 'p01': $ret = 'jp/projects/palestine-report/'; break; case 's07': $ret = 'jp/projects/southafrica-report/'; break; case 'l07': $ret = 'jp/projects/laos-monthlyreport/'; break; } $yyyymmdd = TransDate1to2( $arg_articledate ); $ret = $ret . substr($yyyymmdd,0,4) . "/" . substr($yyyymmdd,4,2) . "/" . sprintf("%06d",$arg_no) . ".html"; return $ret; } $ThreadName = $_REQUEST["ThreadName"]; $ArticleNo = $_REQUEST["ArticleNo"]; $lastno = GetLastno( DATAFILE ); if( $ArticleNo == LATEST ) { $ArticleNo = $lastno; } list($title, $articledate, $dummy, $publishdate, $name_kanji, $name_hiragana, $handle, $note ) = GetArticleData( DATAFILE, $ArticleNo ); $url=MakeNewURL($ThreadName, $ArticleNo, $articledate); header( "HTTP/1.1 301 Moved Permanently"); //header( "HTTP/1.1 302 Moved Temporary" ); header( "Location: http://www.ngo-jvc.net/".$url ); ?>