非常好的目录导航文件代码

非常好的目录导航文件代码
这个代码虽然短小，但很实用，它可以轻松建立你指定的目录里的指定后缀名文件的超连接，而且可以设定，不会将指定的目录首页导航。
{
$files = dir("."); //指定目录
$pipe  = " | ";    //管道符
//通过以下的循环搜索目录中所有文件
while ($current = $files->read())
   {
     //ignor all files not of htm type.
    if (strpos($current, "
[url=javascript:;]php[/url]
\")!= FALSE)  //设定后缀为PHP的文件将被导航
       //忽略自己(如 index.html)
       {   
          if (strpos($current, "ndex") == FALSE)
          {
             print "";
             print $current;
             print "";
             print $pipe;
          };  
       };
     };
};
navbar() //调用函数
?>