<p>　　写的一个比较烂的目录文件列表程序，支持多系统，可按时间排序，可进入多层目录</p><p>　　<code><?//List.php<br />//Power by Devchina.com 2oa.net<br />$Path=($dir)?urldecode($dir):"d:";//最好用session设置路径安全<br />$handle=opendir($Path);<br />while ($file = readdir($handle)) {<br />$newpath=$Path."/".$file;<br />if($file==".." or $file==".") {<br />//你可以把..或者.加上连接作为回上一层的";<br />　　continue;<br />}<br />if(is_dir($newpath)){<br />　　$p[intval(filemtime($newpath))]=$file;<br />}else<br />　　&#160;{<br />$f[intval(filemtime($newpath))]=$file;<br />　　&#160;}<br />}<br />echo "排序规则：按时间 <a href=list.php?order=up&dir=$dir>升</a>(最老的文件在最前面) 　 <a href=list.php?order=down&dir=$dir>降</a>(最新的文件在最前面)";<br />$cd=($order=="up")?sizeof(@ksort($p)):sizeof(@krsort($p));<br />$cf=($order=="up")?sizeof(@ksort($f)):sizeof(@krsort($f));<br />if($cd>0){<br />　　while(list($key,$val)=each($p)){<br />　&#160;<br />echo "<br>";<br />echo "<IMG SRC=\"folder.gif\" WIDTH=\"15\" HEIGHT=\"13\" BORDER=0 >　<a href=list.php?order=$order&dir=".urlencode($Path."/".$val).">$val</a>";<br />echo "　　创建时间：".@date("Y-m-j:H:i:s",$key)."";<br />}<br />}<br />unset($p);<br />unset($cd);<br />if($cf>0){<br />　　while(list($key,$val)=each($f)){<br />echo "<br>";<br />echo "<IMG SRC=\"file_unknow.gif\" WIDTH=\"13\" HEIGHT=\"15\" BORDER=0 >　$val";<br />echo "　　创建时间：".@date("Y-m-j:H:i:s",$key)."";<br />}<br />}<br />unset($f);<br />unset($cf);<br />closedir($handle);<br />?></code></p>