实现文件上传的程序源码

  •   2009-07-31/22:45
  • <HTML>
    <HEAD>
    <TITLE>文件上传界面</TITLE>
    </HEAD>
    <BODY><TABLE><CENTER>
    <?
    if($UploadAction){
    $UploadAction=0;
    $TimeLimit=60;
    /*设置超时限制时间默认时间为 30s,设置为0时为不限时 */
    set_time_limit($TimeLimit);
    If(($Upfile != "none")&&
    ($Upfile != ""))
    {
    $Filepath="d:\web\web\php\test"; //上载文件存放路径
    $FileName=$Filepath.$Upfile_name;
    if($Upfile_size <1024) //上载文件大小
    {$FileSize = (string)$Upfile_size . "字节";}
    elseif($Upfile_size <(1024 * 1024))
    {
    $FileSize = number_format((double)($Upfile_size / 1024), 1) . " KB";
    }
    else
    {
    $FileSize = number_format((double)($Upfile_size/(1024*1024)),1)."MB";
    }
    if(!file_exists($FileName))
    {
    if(copy($Upfile,$FileName))
    {unlink($Upfile);
    echo "<br><br>\n";
    echo "文件 $Upfile_name 已上载成功!";
    echo "<br><br>\n";
    echo "文件位置:$FileName";
    echo "<br><br>\n";
    echo "文件大小:$FileSize";
    echo "<br><br>\n";
    }
    else
    {echo "文件 $Upfile_name上载失败!"; }
    }
    else
    {echo "文件 $Upfile_name已经存在!"; }
    }
    else
    {echo "你没有选择任何文件上载!"; }
    set_time_limit(30); //恢复默认超时设置
    }
    ?>
    <FORM ENCTYPE = "multipart/form-data" NAME = "SubmitForm"
    ACTION = "default.php" METHOD = "POST">
    <INPUT TYPE = "hidden" NAME = "MAX_FILE_SIZE" VALUE ="1000000">
    <INPUT TYPE = "hidden" NAME = "UploadAction" VALUE = "1">
    <TR><TD><INPUT NAME = "Upfile" TYPE = "file" SIZE = "30"></TD>
    </TR><TR><TD><INPUT NAME = "submit" VALUE = "提交" TYPE = "submit">
    <INPUT NAME = "reset" VALUE = "重置" TYPE = "reset"></TD>
    </TR></FORM></CENTER></TABLE>
    </BODY>
    </HTML>


    评论 {{userinfo.comments}}

    {{money}}

    {{question.question}}

    A {{question.A}}
    B {{question.B}}
    C {{question.C}}
    D {{question.D}}
    提交

    驱动号 更多