发博文
Stylist Diary

blueday.blog.chinaunix.net

Easy come, easy go.   
个人资料
  • 博客访问:1421139
  • 博文数量:375
  • 博客积分:10035
  • 博客等级:上将
  • 注册时间:2005-11-06 11:26:11
订阅我的博客
  • 订阅
  • 订阅到鲜果
  • 订阅到抓虾
  • 订阅到Google
字体大小: 博文


<?php
/**********************
一个简单的目录递归函数
第一种实现办法:用dir返回对象
***********************/
function tree($directory)
{
$mydir=dir($directory);
echo "<ul>\n";
while($file=$mydir->read()){
if((is_dir("$directory/$file")) AND ($file!=".") AND ($file!=".."))
{echo "<li><font color=\"#ff00cc\"><b>$file</b></font></li>\n";
tree("$directory/$file");
}
else
echo "<li>$file</li>\n";
}
echo "</ul>\n";
$mydir->close();
}
//开始运行
echo "<h2>目录为粉红色</h2><br>\n";
tree("./libwww1");
/***********************
第二种实现办法:用readdir()函数
************************/
function listDir($dir){
   if(is_dir($dir)){
     if ($dh = opendir($dir)) {
        while (($file= readdir($dh)) !== false){
     if((is_dir($dir."/".$file)) && $file!="." && $file!=".."){
     echo "<b><font color='red'>文件名:</font></b>",$file,"<br><hr>";
     listDir($dir."/".$file."/");
     }else{
         if($file!="." && $file!=".."){
         echo $file."<br>";
      }
     }
        }
        closedir($dh);
     }
   }
}
//开始运行
listDir("./libwww1");
?>

亲,您还没有登录,请[登录][注册]后再进行评论