模擬xcopy的函數
/*************************************
* 系統名稱：模擬xcopy的函數
*程式功能：模擬xcopy的函數
* 開發日期：2003/03/14
**************************** *********/
?>
//copy a direction's all files to another direction
function xCopy($source, $destination, $ child){
//用法：
// xCopy("feiy","feiy2",1):拷貝feiy下的檔案到feiy2,包含子目錄
// xCopy("feiy", "feiy2",0):拷貝feiy下的檔案到feiy2,不包含子目錄
//參數說明：
// $source:來源目錄名稱
// $destination:目的目錄名稱
// $child:複製時，是不是包含的子目錄
if(!is_dir($source)){
echo("Error:the $source is not a direction!");
return 0;
}
if(!is_dir($destination)){
mkdir($destination,0777);
}
$handle=dir( $source);
while($entry=$handle->read()) {
if(($entry!=".")&&($entry!="..")){
if(is_dir($source."/".$entry)){
if($child)
xCopy($source."/".$entry,$destination."/".$entry, $child);
}
else{
copy($source."/".$entry,$destination."/".$entry);
}
}
}
return 1;
}
?>
