另类的文件上传解决方案

编写思路:把本地文件在客户端通过base64编码以后发送目的地.
测试过程中,上传文件过大,导致超时不成功.
后来经过改善.把编码分段发送.测试20m成功

编写目的:在传统的解决方案里面,一次一次选取上传可以.但是在碰到把数据库里文件路径读出来,并把这些文件上传到一个地方的时候就比较麻烦.
如果得到路径一个一个去找到用ftp当然也是可以的,但每次找这些文件我看都会比较费时。这里编写这个主要就是为了通过数据库里的文件路径取得文件.把文件一次批量上传到一个地方.
其主要目的还是为了锻炼一下自己.

解决过程:起初试着用模拟键盘输入强行赋值给file控件用传统的方法上传。可是老碰到空值的情况，以至有很多文件没有发送出去。查阅一些资料,现在是把所有路径通过数据库取到然后写到一个js里。然后在前台用js读取这些路径,通过xmlhttp来发送文件。
因为ie不太喜欢xmlhttp.总认为他有恶意行为.所以老谈出提示警告.所以操作的时候不能使用web路径.只能用物理路径去访问它.
然后服务端有一文件来接收这些编码,并对其进行解码.所以我称之为"c/s". ^_^

目前很多代码还在完善中.
简单介绍一下:
-------------------------------------------------------------
aryfiles.push("c:\\aaa.zip") ;
aryfiles.push("c:\\bbb.exe") ;
这里为文件路径和文件.可为多个
以后这个路径也可以通过file控件在客户端取到

http://
这个是目的地,可以改为自己想要的地址.

ado_stream.loadfromfile(server.mappath(".") &"/"& + str_filename)
server.mappath(".") &"/"& + str_filename 这里是读取文件.
server.mappath(".") &"/"& 路径和存放路径一致

ado_stream.savetofile server.mappath(".") &"/"& str_filename,2
server.mappath(".") &"/"& 这个为存放文件的路径. str_filename 为文件名

这里读取和存放都是放在程序所放目录中.大家测试的时候也可以保持这样即可

把第一段代码放到本地(eg:c:\upload.htm)

把第二段代码放到服务器上,可以是本地服务器,可以是公网服务器.和上面的目的地保持一致
(eg:http://www.xxx.com/upload.asp or http:// localhost/www/upload.asp)
----------------------------------------------------------------

操作:找到第一段代码保存的地方。执行即可(eg:打开c盘执行upload.htm)
客户端代码

<p> </p> <p> </p> <meta http-equiv="Content-Type" content="text/html;charset=UTF-8"> <input type="button" onclick="beginsendfiles();" value="发送"><input type="button" onclick="javascript: breaked=true;" value="中断"> <br> <p> </p> <p></p> <p></p> <p> blocksize = 1024*100 ;//每次发送字节数 breaked = false ; aryfiles = new array() ;</p> <p> // 开始发送文件 function beginsendfiles() { initaryfiles() ; sendfile(aryfiles.pop()) ; } // 构造待发送文件的数组 function initaryfiles() { aryfiles.push("c:\\aaa.zip") ; aryfiles.push("c:\\bbb.exe") ; //c:\\aaa.zip c:\\bbb.exe本地文件 aryfiles.reverse() ;//文件名 }</p> <p> function sendfile(vfullpath) { // 空文件则不执行上传 if (!vfullpath) { return ; } breaked = false ; div_message.innerhtml = "" ; ado_stream = new activexobject("adodb.stream"); // 读取文件的流 ado_stream.type = 1; ado_stream.open(); ado_stream.loadfromfile(vfullpath); // 读取文件 ado_stream.position = 0 ;</p> <p> sendcount = math.ceil(ado_stream.size/blocksize) ; // 如果有余数则多发送一次</p> <p> // alert(sendcount) ;</p> <p> var reg = /\b\w+.\w+$/gi mfilename = reg.exec(vfullpath) ; mpartstart = true ; mpartid = 1 ; mpartend = false ; senddata() ; }</p> <p> function senddata() { if (sendcount > 0) { var dom = new activexobject("msxml2.domdocument"); // 发送的xml文件 dom.async = false; dom.resolveexternals = false;</p> <p> // 构造xml文件头 var node = dom.createprocessinginstruction("xml","version='1.0'"); dom.appendchild(node) ; node = null ; // 构造root节点 var root = dom.createelement("root"); dom.appendchild(root) ; dom.documentelement.setattribute("xmlns:dt", "urn:schemas-microsoft-com:datatypes"); // 构造保存二进制数据的节点updata node = dom.createelement("updata") ; node.datatype = "bin.base64" ; // bin。base64编码 var att = dom.createattribute("filename") ; // 文件名属性 att.value = mfilename ; node.setattributenode(att) ; att = null ; var att = dom.createattribute("partstart") ; // 分段开始标记 att.value = mpartstart ; node.setattributenode(att) ; att = null ; var att = dom.createattribute("partid") ; // 分段序号 att.value = mpartid ; node.setattributenode(att) ; att = null ; var att = dom.createattribute("partend") ; // 分段结束标记 att.value = mpartend ; node.setattributenode(att) ; att = null ;</p> <p> root.appendchild(node) ; node.nodetypedvalue = ado_stream.read(blocksize); // 节点数据从stream读取，固定长度 node = null ; sendcount -= 1 ; xmlhttp = new activexobject("microsoft.xmlhttp"); xmlhttp.open("post","http://www.xxx.com/xxx/xxx.asp", false); //http://www.xxx.com/xxx/xxx.asp 为web路径上的文件 xmlhttp.onreadystatechange= callback ; xmlhttp.send(dom); mpartstart = false ; xmlhttp = null ; } else { ado_stream.close(); ado_stream = null ; } } function callback() { // 上传成功 if(xmlhttp.readystate == 4) { // 检查是否中断上传 if(breaked) { return ; }</p> <p> if (sendcount > 0) { mpartid += 1 ; // div_message.innerhtml += (" " + xmlhttp.responsetext) ; var p = math.floor((mpartid/(math.ceil(ado_stream.size/blocksize) + 1)) * 100) ; // 计算进度百分比 showbar(p) ; var t = settimeout("senddata();", 1) ; } else { // 传送完文件 //div_message.innerhtml += mfilename + "传送完毕！ " ;</p> <p> // 继续传下一文件 showbar(0) ; var cfile = aryfiles.pop() ; sendfile(cfile) ; } } </p> <p> }</p> <p> function showbar(per) { // 进度条 ddd.innerhtml = "</p> <table width="200" border="0" cellpadding="0" cellspacing="0"><tr><td bgcolor="#6699ff"><input type="button" style=' width:" + per + "% ; border:0px; background:#005599; color:#ffffff' value=" + per + "></td></tr></table>" ; } <p> </p> <p></p>
[ctrl+a 全选 注:如需引入外部js需刷新才能执行]

服务器端

<p> </p> <p> </p> <p>' 定义变量和对象。 dim ado_stream dim xml_dom dim xml_data dim str_filename dim bol_partstart dim int_partid dim bol_partend </p> <p>' 创建 stream 对象 set ado_stream = server.createobject("adodb.stream") ' 从request对象创建 xmldom对象 set xml_dom = server.createobject("msxml2.domdocument") xml_dom.load(request) ' 读出包含二进制数据的节点 set xml_data = xml_dom.selectsinglenode("root/updata") str_filename = xml_data.getattribute("filename") bol_partstart = cbool(xml_data.getattribute("partstart")) int_partid = cint(xml_data.getattribute("partid")) bol_partend = cbool(xml_data.getattribute("partend"))</p> <p>' 打开stream对象，把数据存入其中 ado_stream.type = 1 ' 1=adtypebinary ado_stream.open if not bol_partstart then ado_stream.loadfromfile(server.mappath(".") &"/"& + str_filename) ' 读取文件 ado_stream.position = ado_stream.size end if ado_stream.write xml_data.nodetypedvalue ' 文件存盘 ado_stream.savetofile server.mappath(".") &"/"& str_filename,2 '保存文件 2=adsavecreateoverwrite ado_stream.close </p> <p>' 释放资源 set ado_stream = nothing set xml_dom = nothing ' 向浏览器返回信息 response.write "upload successful!"& str_filename & int_partid & bol_partstart %> </p> <p></p>
[ctrl+a 全选 注:如需引入外部js需刷新才能执行]