如何写 php上传下载的小程序急用！

<HTML>
<HEAD>
<TITLE>多個文件上傳</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=big5">
</HEAD><BODY>
<form name=fileup method=post enctype="multipart/form-data">
多個文件上傳<br>
文件1:<input type=file name=file[]><br>
文件2:<input type=file name=file[]><br>
文件3:<input type=file name=file[]><br>
文件4:<input type=file name=file[]><br>
文件5:<input type=file name=file[]><br>
<input type=submit value="提交" name=sub>
</form>
</BODY>
</HTML>
<?
if ($sub){
$WEB_ROOT=$HTTP_SERVER_VARS["DOCUMENT_ROOT"];
$DirPath=$WEB_ROOT."/ljhtest/upfile/"; //dirname返回絕對路徑。如：c:\ljh
// echo $DirPath;
$Num=count($file)."<br>";
// echo $Num;
for($i=0;$i<$Num;$i++){
if (is_uploaded_file($file[$i])){
$FileBaseName=substr($file_name[$i],0,strrpos($file_name[$i],"."));
if (file_exists($DirPath.$FileBaseName."/$file_name[$i]")){
echo "<br>文件".($i+1).":$file_name[$i]已存在於[$DirPath"."$FileBaseName/],上傳失敗!";
continue;
}
if (!file_exists($DirPath.$FileBaseName)){
if(!mkdir($DirPath.$FileBaseName,0777)) {
echo "建立目錄失敗!";
continue;
}else
move_uploaded_file($file[$i],$DirPath.$FileBaseName."/$file_name[$i]");
}else
move_uploaded_file($file[$i],$DirPath.$FileBaseName."/$file_name[$i]");
echo "<br>文件".($i+1).":$file_name[$i]上傳到目錄[$DirPath.$FileBaseName]成功!類型:$file_type[$i]";
}else echo "<br>文件".($i+1)."為非法上傳文件!";
}}
?>