function myreaddir($dir)   {  
  $handle=opendir($dir);  
  $i=0;  
  while($file=readdir($handle))   {  
  if   (($file!=".")and($file!=".."))   {  
  $list[$i]=$file;  
  $i=$i+1;  
  }  
  }  
  closedir($handle);    
  return   $list;  
}   
print_r(myreaddir('C:\WINDOWS\Fonts'));

解决方案 »

  1.   

     用readfile函数打开电脑里的字体文件夹在浏览器上显示出来,行么?
      

  2.   


    function myreaddir($dir)   {  
      $handle=opendir($dir);  
      $i=0;  
      while($file=readdir($handle))   {  
      if   (($file!=".")and($file!=".."))   {  
       if(is_file($file)){
          $list[$i]=$file;  
          $i=$i+1;  
       }
      }  
      }  
      closedir($handle);    
      return   $list;  
    }   
    print_r(myreaddir('C:\WINDOWS\Fonts'));
      

  3.   

    结贴.用了一个VB6,输出文本格式,然后include.