tempad
ReadyGo!技术成就梦想 >>ASP实例 >> ASP实例:一个简单的ASP无组件上传类

ASP实例:一个简单的ASP无组件上传类

ReadyGo!技术成就梦想 网络搜索 efish 2008-2-24 3:06:14

简单的ASP无组件上传类,发出来让大家看看。可以做做实验!

<%@ language="javascript"%>
<%
var self = Request.serverVariables("SCRIPT_NAME");
if (Request.serverVariables("REQUEST_METHOD")=="POST")
{
        var oo = new uploadFile();
        oo.path = "myFile";                        //存放路径,为空表示当前路径,默认为uploadFile
        oo.named = "file";                        //命名方式,date表示用日期来命名,file表示用文件名本身,默认为file
        oo.ext = "all";                                //允许上传的扩展名,all表示都允许,默认为all
        oo.over = true;                                //当存在相同文件名时是否覆盖,默认为false
        oo.size = 1*1024*1024;                //最大字节数限制,默认为1G
        oo.upload();
        Response.write("<script type="text/javascript">location.replace(""+self+"")</script>");
}

//ASP无组件上传类
function uploadFile()
{
    var bLen  = Request.totalBytes;
    var bText = Request.binaryRead(bLen);
    var oo = Server.createObject("ADODB.Stream");
    oo.mode = 3;
        this.path = "uploadFile";
        this.named = "file";
        this.ext = "all";
        this.over = false;
        this.size = 1*1024*1024*1024;        //1GB

        //文件上传       
        this.upload = function ()
        {
                var o = this.getInfo();
                if (o.size>this.size)
                {
                        alert("文件过大,不能上传!");
                        return;               
                }
                var f = this.getFileName();
                var ext = f.replace(/^.+\./,"");
                if (this.ext!="all"&&!new RegExp(this.ext.replace(/,/g,"|"),"ig").test(ext))
                {
                        alert("目前暂不支持扩展名为 "+ext+" 的文件上传!");
                        return;
                }
                if (this.named=="date")
                {
                        f = new Date().toLocaleString().replace(/\D/g,"") + "." + ext;
                }

                oo.open();
                oo.type = 1;
                oo.write(o.bin);
                this.path = this.path.replace(/$/,"$&/");
                var fso = Server.createObject("Scripting.FileSystemObject");
                if(this.path!=""&&!fso.folderExists(Server.mapPath(this.path)))
                {
                        fso.createFolder(Server.mapPath(this.path));
                }
                try
                {
                        oo.saveToFile(Server.mapPath(this.path+f),this.over?2:1);
                        alert("上传成功!");
                }
                catch(e)
                {
                        alert("对不起,此文件已存在!");
                }
                oo.close();
                delete(oo);

        }

        //获取二进制和文件字节数
        this.getInfo = function ()
        {
                oo.open();
                oo.type=1;
                oo.write(bText);
                oo.position = 0;                               
                oo.type=2;
                oo.charset="unicode";
                var gbCode=escape(oo.readText()).replace(/%u(..)(..)/g,"%$2%$1");
                var sPos=gbCode.indexOf("%0D%0A%0D%0A")+12;
                var sLength=bLen-(gbCode.substring(0,gbCode.indexOf("%0D%0A")).length/3)-sPos/3-6;
                oo.close();
       
                oo.open();
                oo.type = 1;       
                oo.write(bText);
                oo.position=sPos/3;
                var bFile=oo.read(sLength);
                oo.close();
               
                return { bin:bFile, size:sLength };
        }

        //获取文件名       
        this.getFileName = function ()
        {
                oo.open();
                oo.type = 2;
                oo.writeText(bText);
                oo.position = 0;
                oo.charset = "gb2312";
                var fileName = oo.readText().match(/filename=\"(.+?)\"/i).split("\\").slice(-1);
                oo.close();
                return fileName;
        }
       
        function alert(msg)
        {
                Response.write("<script type="text/javascript">alert(""+msg+"");</script>");
        }
}
%>
<html>
<head>
  <title>ASP无组件上传类</title>
  <meta http-equiv="content-Type" content="text/html; charset=gb2312">
</head>
<body>
  <form action="<%=self%>" method="post" enctype="multipart/form-data" onSubmit="return (this.upFile.value!="");">
    <input type="file" name="upFile"/>
    <input type="submit" value="上传文件"/>
  </form>
</body>
</html>

责任编辑: efish 参与评论 查找更多:
相关文章
ASP类型个人网站与动网整合非官方方法 ASP类型个人网站与动网整合非官方方法
通过实例学习ASP的对象复制 通过实例学习ASP的对象复制
ASP技巧实例:ASP实现最简洁的多重查询的解决方案 ASP技巧实例:ASP实现最简洁的多重查询的解决方案
ASP技巧实例:几行代码解决防止表单重复提交 ASP技巧实例:几行代码解决防止表单重复提交
多个域名后缀同时查询的域名查询系统 多个域名后缀同时查询的域名查询系统
ASP无组件上载,带进度条,多文件上载 ASP无组件上载,带进度条,多文件上载
ASP操作XML文件的完整实例 ASP操作XML文件的完整实例
“在线访客”的制作方法 “在线访客”的制作方法
用asp解析图片地址,并将其保存。 用asp解析图片地址,并将其保存。
加密處理使密碼更安全 加密處理使密碼更安全
2秒记住本站域名

玩过泡泡龙吗?Readygo?Go! 再加上.Com.Cn的后缀,那就是大名小顶的ReadyGo.com.cn

分类导航
ReadyGo!技术成就梦想