+ -
当前位置:首页 → 问答吧 → 上传文件,大家给我看看错在哪。

上传文件,大家给我看看错在哪。

时间:2010-12-06

来源:互联网

############# 第一个文件;
<html>
        <head></head>
        <body>
                <div>
                        <form method = "post" action ="other.html">
                                <input  type="file" value="upload" name="upload"/>
                                <input type="text" name="description" >
                                &nbsp; &nbsp;
                                <input type="submit" value="submit" />
                        </form>
                </div>
        </body>
</html>

## 第二个文件:
<%args>
        $upload
        $description
</%args>
<%init>
        use CGI;
        use strict;
        open(OUT,'> C:/shop/perl/'); # || or die "faild";
        my $buffer;
        binmode OUT;
        while (my $bytesread = read($upload,$buffer,1024)) {
                print OUT $buffer;
        }
        close OUT;
</%init>
<div> 这里还有很多的内容</div>

问题:没有提示错误,但文件夹也没有文件 。

作者: jackson66   发布时间: 2010-12-06

各位大侠帮忙下。谢了。

作者: jackson66   发布时间: 2010-12-06

帮顶。。。。。初学者路过哈

作者: homedw   发布时间: 2010-12-06

mason不是这样写滴~~
mason有一本免费的书,先看看前面基础的。

作者: 兰花仙子   发布时间: 2010-12-06