<?//删除目录classdel_path{functionwm_chief_delpath($del_path){if(!file_exists($del_path))//目标目录不存在则建立{echo"目录不存在";returnfalse;}$hand=opendir($del_path);$i=0;while($file=readdir($hand)){$i;if($i==1||$i==2){continue;}if(!(strchr($file,"."))){$del_s_path=$del_path."/".$file;$this->wm_chief_delpath($d...

function createFolder($path){   if (!file_exists($path))   {    createFolder(dirname($path));    mkdir($path, 0777);   }}createFolder("2007/3/4");//在当前目录下创建2007/3/4的目录结构．...

是在原先的二级目录改的,先给出演示这里是css[code]/*bg macji(http://www.macji.com)*/ ul,li,p{margin:0; padding:0; list-style:none; font-size:12px} .m_menu_title{height:24px;line-height:24px;text-align:center;margin:0 1px} .m_menu_content{border-top:solid 1px #ccc;padding...

********************** (一) 打开记录集,创建数组,把记录集的值赋给数组.<% Dim countset Rs=server.createobject("adodb.recordset")Sql = "select * from BookBoard order by ClassId desc"Rs.open Sql,cn,1,1%><script language = "Ja...

[code]        ’==============================        ’创建多级目录，可以创建不存在的根目录        ’参数：要创建的目录名称，可以是多级        ’创建目录的根目录从当前目录开始   ...

<%’创建多级目录，可以创建不存在的根目录’参数：要创建的目录名称，可以是多级’返回逻辑值，True成功，False失败’创建目录的根目录从当前目录开始’---------------------------------------------------Function CreateMultiFolder(ByVal CFolder)    Dim objFSO, PhCreateFolder, CreateFolderArray, CreateFolder  &nb...

昨天看见一个贴子(chinaasp)问怎么删除目录，以前一直可以，但昨天出了问题，原来他只是把他下级的文件删了后就删目录所以如果多几级就有问题。我的这个只能暂时凑活着用，如果你的目录没有十几层的话应该没有问题的吧~，但我不熟悉递归只能做到deltree($path);rmdir($path)才能删除这个目录能不能做到直接deltree($path);就删除这个目录？？functiondeltree($pathdir){echo$pathdir;//我调试时用的if(is_empty_dir($pathdir))//如果是空的    { &nbs...

<?//删除目录//本程序由wm_chief原创，如要转载，请注明作者与来源(http://www.phome.net)class  del_path{function  wm_chief_delpath($del_path){if(!file_exists($del_path))//目标目录不存在则建立{echo"目录不存在";return  false;}$hand=opendir($del_path);$i=0;while($file=readdir($hand)){$i++;if($i==1||$i==2){contin...