read()) !== false) { if($file!="." && $file!=".." && !is_dir("$inpath/$file")) { @$filesize = filesize("$inpath/$file"); @$filesize=$filesize/1024; @$filetime = filemtime("$inpath/$file"); @$filetime = MyDate("Y-m-d H:i:s",$filetime); if($filesize < 0.1) { @list($ty1,$ty2)=explode(".",$filesize); $filesize=$ty1.".".substr($ty2,0,2); } else { @list($ty1,$ty2)=explode(".",$filesize); $filesize=$ty1.".".substr($ty2,0,1); } } if($file == ".") { continue; } else if($file == "..") { if($activepath == "") { continue; } $tmp = preg_replace("#[\/][^\/]*$#i","",$activepath); $line = "\n"; $dirs[] = $line; } else if(is_dir("$inpath/$file")) { if(preg_match("#^_(.*)$#i",$file)) continue; #屏蔽FrontPage扩展目录和linux隐蔽目录 if(preg_match("#^\.(.*)$#i",$file)) continue; $line = "\n"; $dirs[] = $line; } else if(preg_match("#\.(gif|png|jpg|jpge|ico)#i",$file)) { $line = "\n"; $files[] = $line; } else if(preg_match("#\.(zip|rar|tar.gz|exe)#i",$file)) { $line = "\n"; $files[] = $line; } else if(preg_match("#\.(mp3|wma)#i",$file)) { $line = "\n"; $files[] = $line; } else if(preg_match("#\.(wmv|api|rm|rmvb)#i",$file)) { $line = "\n"; $files[] = $line; } else if(preg_match("#\.(inc|pl|cgi|asp|xml|xsl|aspx|cfm|js|css|php|htm|html)#i", $file)) { $edurl = "file_manage_view.php?fmdo=edit&filename=".urlencode($file)."&activepath=".urlencode($activepath); $line = "\n"; $files[] = $line; } else if(preg_match("#\.(txt)#i",$file)) { $edurl = "file_manage_view.php?fmdo=edit&filename=".urlencode($file)."&activepath=".urlencode($activepath); $line = "\n"; $files[] = $line; } else { $line = "\n"; $files[] = $line; } } $dh->close(); foreach ($dirs as $dir) { echo $dir; } foreach ($files as $file) { echo $file; } ?>

文件名	文件大小	最后修改时间	操作
$activepath
$file			[改名]   [删除]
$file	$filesize KB	$filetime	[改名]   [删除]   [移动]
$file	$filesize KB	$filetime	[改名]   [删除]   [移动]
$file	$filesize KB	$filetime	[改名]   [删除]   [移动]
$file	$filesize KB	$filetime	[改名]   [删除]   [移动]
$file	$filesize KB	$filetime	[编辑]   [改名]   [删除]   [移动]
$file	$filesize KB	$filetime	[编辑]   [改名]   [删除]   [移动]
$file	$filesize KB	$filetime	[改名]   [删除]   [移动]