免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1165 | 回复: 0
打印 上一主题 下一主题

使用xmlhttp 实现多文件上传 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2005-08-17 11:33 |只看该作者 |倒序浏览
使用xmlhttp 实现多文件上传
如今xml技术渐渐成熟,成为了一种网站传播数据的又一种方式,下面是用xmlhttp写的一个多文件上传程序.包括客户端和服务端两部分..
本程序的实现是利用xml可以在其结点存放经base64编码的二进制文件,先在客户端生成包含要传文件的xml 再,通过xmlhttp发送到服务端.下面是客户端:
XML上传客户端
提交到asp页面
上传到服务器路径
设定文件上传数:  设定
上传
返回信息:
";
tal+=str;
}
div1.innerHTML=tal;
}
displayForm(2);
function sendfile(){
//创建dom对象
var xmldom=new ActiveXObject("MSXML2.DOMDocument");
xmldom.async=false;
//载入外部xml 文件,在与本文件同一目录下建一 xml.xml 内容为
xmldom.load("xml.xml");
//建立本地ado 对象
var ado=new ActiveXObject("ADODB.Stream");
ado.Type=1; // 1=adTypeBinary ado_stream;
var allfile=document.all("upfile");
//alert(allfile.length);
//循环读取textbox
for(a=1;a
}
//-->
function BytesToBstr(body,Cset) //将收到的数据转为UNICODE
dim objstream
set objstream =CreateObject("adodb.stream")
objstream.Type=1
objstream.Mode=3
objstream.Open
objstream.Write body
objstream.Position=0
objstream.type=2
objstream.Charset=Cset
BytesTobstr=objstream.ReadText
objstream.Close
set objstream=nothing
end function
客户端完成
服务端比较简单:
ok!
by  execute OK!
使用时当上传两个3M的文件时,cpu使用占100%,当前窗口出现假死现象.但过一会就可以完成.


本文来自ChinaUnix博客,如果查看原文请点:http://blog.chinaunix.net/u/1507/showart_42973.html
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP