復(fù)制代碼 代碼如下:

<?php
function dir_path($path) {
$path = str_replace('//', '/', $path);
if (substr($path, -1) != '/') $path = $path . '/';
return $path;
}
/**
* 列出目錄下的所有文件
*
* @param str $path 目錄
* @param str $exts 后綴
* @param array $list 路徑數(shù)組
* @return array 返回路徑數(shù)組
*/
function dir_list($path, $exts = '', $list = array()) {
$path = dir_path($path);
$files = glob($path . '*');
foreach($files as $v) {
if (!$exts || preg_match("http://.($exts)/i", $v)) {
$list[] = $v;
if (is_dir($v)) {
$list = dir_list($v, $exts, $list);
}
}
}
return $list;
}
?>

復(fù)制代碼 代碼如下:

<?php
$r = dir_list('dir');
printf("<p>輸出數(shù)據(jù)為：</p><pre>%s</pre>/n", var_export($r , true));
?>

復(fù)制代碼 代碼如下:

<?php
/* 函數(shù) listDirTree( $dirName = null )
** 功能 列出目錄下所有文件及子目錄
** 參數(shù) $dirName 目錄名稱
** 返回 目錄結(jié)構(gòu)數(shù)組 false為失敗
*/
function listDirTree( $dirName = null )
{
if( empty( $dirName ) )
exit( "IBFileSystem: directory is empty." );
if( is_dir( $dirName ) )
{
if( $dh = opendir( $dirName ) )
{
$tree = array();
while( ( $file = readdir( $dh ) ) !== false )
{
if( $file != "." && $file != ".." )
{
$filePath = $dirName . "/" . $file;
if( is_dir( $filePath ) ) //為目錄,遞歸
{
$tree[$file] = listDirTree( $filePath );
}
else //為文件,添加到當(dāng)前數(shù)組
{
$tree[] = $file;
}
}
}
closedir( $dh );
}
else
{
exit( "IBFileSystem: can not open directory $dirName.");
}
//返回當(dāng)前的$tree
return $tree;
}
else
{
exit( "IBFileSystem: $dirName is not a directory.");
}
}
$files = listDirTree(".");
//print_r($files);
$size = count(files);
//以下代碼是創(chuàng)建一個(gè)本目錄下文件的列表（帶有鏈接地址）
echo '<ol>';
for( $i=0; $files[$i] != NULL; $i++ ) {
echo '<li><a href="'.($files[$i]).'" target="_blank">'.$files[$i].'</a></li>';
}
echo '</ol>';
?>