<? /********************************************************************************/ /* Wanderer Board (附属删除程式): */ /* ============================== */ /* Version: 2.0.0 -- 07 July 2001 */ /* */ /* --------------------------------------------------- */ /* - 程式版權 (c) 2001 by 旅 行 www.lvxing.net - */ /* - PHPの酷 版權所有 http://phpiscool.yeah.net - */ /* --------------------------------------------------- */ /* */ /* ============================== */ /* 網站地址: phpiscool.yeah.net - www.lvxing.net - wdb.yesky.net */ /********************************************************************************/ /* 版權說明: 本軟體为共享軟體。你可以使用, 放置網站供他人下載。请保留此声明 */ /* */ /* 本人保留對本軟體之更改與訂正之權利, 任何人不得修改本軟體之任一部份(如必 */ /* 須更改請與作者聯絡)。使用者執行本軟體所需之設定或美化外觀所需之更改不在此 */ /* 限。使用者須保留版權說明和著作權申明，不得刪除。 */ /* */ /* 違反著作權法之規定，本人保留法律追訴之權利，逕對使用者控告侵害著作權！ */ /********************************************************************************/ //-------使用方法-------------------- // 将本软体上传至支持PHP之服务器空间 // 在IE / NS 地址项目输入软体地址 //---------------------------------- //-----对于使用本软体所带来的任何可能损失，本人概不负责--------------- //-----如果由于SAFE MODE导致UID不匹配而无法删除-------------------- // 可以另外创建一PHP程序，比如名为 copy.php， 内容如下， // 只有一行： <? copy("del1.php", "del.php"); // 将本脚本改名为 del1.php 上传至空间，然后运行 copy.php (两者须在同一目录) // 然后调用 del.php 即可。 ?> <html> <head> <title>WandererBoard - 目录删除工具</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <style type="text/css"> BODY { COLOR: #3F3849; FONT-FAMILY: Verdana,Arial; FONT-SIZE: 9pt; SCROLLBAR-BASE-COLOR: #666688; SCROLLBAR-ARROW-COLOR: #D3D3FF; SCROLLBAR-HIGHLIGHT-COLOR: #444466; } A:LINK {COLOR: #3F3849; TEXT-DECORATION: none} A:VISITED {COLOR: #3F3849; TEXT-DECORATION: none} /* hover color for links (Internet Explorer only) */ A:HOVER {COLOR: #F5D300; BACKGROUND-COLOR: #40364d} A:ACTIVE {COLOR: #F5D300; BACKGROUND-COLOR: #40364d} .t { LINE-HEIGHT: 1.4} TD,SELECT,TEXTAREA,DIV,FORM,OPTION,P{COLOR:333333; FONT-FAMILY: 宋体; FONT-SIZE: 9pt} INPUT { FONT-FAMILY: 宋体; FONT-SIZE: 9pt; height:22px; } </style> </head> <body bgcolor=#555570 topmargin=5 leftmargin=5> <table width=95% cellpadding=0 cellspacing=1 border=0 bgcolor=#222244 align=center> <tr><td> <table width=100% cellpadding=0 cellspacing=1 border=0> <tr> <td valign=top bgcolor=#FFFFFF> <table width=100% cellpadding=6 cellspacing=0 border=0> <tr><td bgcolor=#80809b colspan=2><font color=#FFFFFF> <b>欢迎来到 WDB 讨论区附属工具 -- 文件/目录删除工具</b> </td></tr> <? if (empty($dir)) { ?> <tr> <td bgcolor=#EEEEEE valign=middle colspan=2 align=center><font color=#333333><b>请输入您要删除的文件/目录</b></font></td></tr> <form action="del.php" method="post"> <tr><td> <br> <table width=300 align=center cellspacing=1 cellpadding=0 bgcolor=333333> <tr><td> <table width=100% cellspacing=0 cellpadding=3> <tr bgcolor=EEEEE8> <font face=verdana> <td valign=middle align=center><font color=#555555><b>请输入欲删除的文件/目录</b></font><br><input type=text size=45 name="dir" ><br><br>警告：该文件/目录删除后无法恢复！！！</td></tr> </table> </td></tr></table> </td></tr> <tr bgcolor=FFFFFF> <td valign=middle colspan=2 align=center><input type=submit name="submit" value="确 认"></td></tr></form> <tr> <td bgcolor=#FFFFFF valign=middle align=left colspan=2><font color=#555555> <blockquote><b>请注意</b><p><b>你可以使用绝对路径/相对路径</b><p>绝对路径请填写完整，UNIX下比如： /home/myaccount/tesdir 在NT下比如： C:/www/testdir 。<br>相对路径的填写是相对于本脚本存在位置的： 比如本脚本存在于 wdb 目录下，您欲删除 wdb/userdir， 则可以填写 userdir <? } else { ?> <tr> <td bgcolor=#EEEEEE valign=middle colspan=2 align=center><font color=#333333><b>执行删除操作</b></font></td></tr> <form action="admin.php" method="post"> <tr><td> <br> <table width=400 align=center cellspacing=1 cellpadding=0 bgcolor=333333> <tr><td> <table width=100% cellspacing=0 cellpadding=3> <tr bgcolor=EEEEE8><td valign=middle align=center> <font face=verdana color=#555555> <? if (is_dir($dir)) { kill_dir($dir); echo "<b>$dir</b> -- "; if (rmdir($dir)) echo "成功删除"; else echo "失败"; echo "<br>"; } else { echo "<b>$dir</b> -- "; if (unlink($dir)) echo "成功删除"; else echo "失败"; echo "<br>"; } ?><br> <b>执行完成 ---- 删除操作</b><br>提醒：目录无法恢复！！！如果由于权限错误，或其他限制，目录可能无法彻底删除</td></tr> </table> </td></tr></table> </td></tr> <tr> <td bgcolor=#FFFFFF valign=middle align=left colspan=2><font color=#555555> <blockquote><b>请注意</b><p><b>你可以使用绝对路径/相对路径</b><p>绝对路径请填写完整，UNIX下比如： /home/myaccount/tesdir 在NT下比如： C:/www/testdir 。<br>相对路径的填写是相对于本脚本存在位置的： 比如本脚本存在于 wdb 目录下，您欲删除 wdb/userdir， 则可以填写 userdir <? } function kill_dir($dir) { $dirhandle=opendir($dir); while($file_name=readdir($dirhandle)) { if ($file_name!="." && $file_name!="..") { if (is_dir("$dir/$file_name")) { kill_dir($dir."/".$file_name); echo "<b>$dir/$file_name</b> -- "; if (rmdir("$dir/$file_name")) echo "成功删除"; else echo "失败"; echo "<br>"; } else {echo "$dir/$file_name -- "; if (unlink("$dir/$file_name")) echo "成功删除"; else echo "失败"; echo "<br>"; } } } closedir($dirhandle); } ?> <hr> <table width=200 align=right cellspacing=0 cellpadding=0 bgcolor=333333> <tr><td> <table width=100% cellspacing=1 cellpadding=3> <tr><td bgcolor=EEEEE8> 软体编写： <a href="http://lvxing.net" target=_blank>旅 行</a><br> 版权所有： <a href="http://lvxing.net" target=_blank>PHPの酷程式</a><br> A memeber of Lyra Studio </td></tr></table> </td></tr></table> </blockquote> </td></tr> </table></td></tr></table> </td></tr></table></body></html>