録画番組削除
  
削除番組はありません。\n";
}else{
$userclass = getuserclass($con);
if ( $userclass <= 1){
print "
次の番組を削除しました。
  
	
		
			| ファイル名 | タイトル | 話数 | サブタイ | 
	
	";
foreach ($delete as $fName) {
		$filesplit = split("-",$fName);
	
/*
if ($filesplit[1] == ""){
$query = "
SELECT 
foltia_program.tid,foltia_program.title,foltia_subtitle.subtitle  
FROM foltia_subtitle , foltia_program   
WHERE foltia_program.tid = foltia_subtitle.tid  
 AND foltia_subtitle.tid = ? 
";
$rs = sql_query($con, $query, "DBクエリに失敗しました",array($filesplit[0]));
				$rall = $rs->fetchAll();
				//$rowdata = $rall[$row];
				$rowdata = $rall[0];
$title = $rowdata[1];
$subtitle = "";
$count = "";
*/
//}else{
$query = "
SELECT foltia_program.tid,foltia_program.title,foltia_subtitle.countno,foltia_subtitle.subtitle 
FROM foltia_subtitle , foltia_program 
WHERE foltia_program.tid = foltia_subtitle.tid 
AND foltia_subtitle.m2pfilename =  ? 
";
//$rs = m_query($con, $query, "DBクエリに失敗しました");
//$rs = sql_query($con, $query, "DBクエリに失敗しました",array($filesplit[0] ,$filesplit[1]));
$rs = sql_query($con, $query, "DBクエリに失敗しました",array($fName));
				$rall = $rs->fetchAll();
				//$rowdata = $rall[$row];
				$rowdata = $rall[0];
//print" $fName./$rowdata[1]/$rowdata[2]/$rowdata[3]
\n";
$title = $rowdata[1];
$count = $rowdata[2];
$subtitle = $rowdata[3];
//}//end if 話数がNULL
$tid = htmlspecialchars($rowdata[0]);
$title = htmlspecialchars($title);
$count = htmlspecialchars($count);
$subtitle = htmlspecialchars($subtitle);
print "
| $fName 
 | ";
if ($tid > 0 ){
	print "$title";
}else{
	print "$title";
}
print " | $count 
 | $subtitle 
 | 
\n
";
//DBから削除
if ($demomode){
}else{
$query = "
DELETE  FROM  foltia_m2pfiles  
WHERE m2pfilename = ? 
";
//$rs = m_query($con, $query, "DBクエリに失敗しました");
$rs = sql_query($con, $query, "DBクエリに失敗しました",array($fName));
//削除処理
$oserr = system("$toolpath/perl/deletemovie.pl $fName");
}//end if demomode
}//foreach
print "	
\n";
}else{//権限なし
	print "
ファイル削除権限がありません。
";
}
}//if $delete == ""
?>