本文讲解了一个使用XML技术上传文件的例子，使用该方法没有传统方法中的种种限制。 这个例子讲述了如何使用MSXML3.0和ADO Stream对象来实现这种新的上传方法。好处有很多，比如，不需要专用的上传组件。
引言
为了在HTML网页中获得上传功能，在客户端我们可以使用如下格式的FORM：
<FORM NAME="myForm"
obj_node.dataType - 该可读写的属性定义了特定节点的数据类型。MSXML解析器支持更多的数据类型（参见MSDN：http://msdn.microsoft.com/library/psdk/xmlsdk/xmls3z1v.htm）
对于二进制数据，我们可以使用“bin.base64”类型。
obj_node.nodeTypedValue - 该可读写属性包含了按照制定类型表示的指定节点的数据。我们可以创建一个包含多个bin.base64类型节点的XML文档，节点中包含上传的文件。这点特性可以使用一个POST一次上传多个文件。
我们可以使用XMLHttpRequest对象和POST方法发送一个XML文档给Web服务器。该对象为HTTP服务器提供了客户端协议支持，允许在Web服务器上发送和接受MS XMLDOM对象。XMLHttpRequest是Internet Explorer 5内置的COM对象（不需要定制安装），并且发送完毕后无需转换页面。
对ADO Stream对象的思考
我们可以在客户端创建一个包含一个或者多个二进制节点的XML文档。我们还必须把文件内容填入节点中。但是很不幸，脚本语言不能访问本地文件系统，并且Scripting.FileSystem对象（是Win32系统的内置对象）到目前为止还不能访问二进制文件。这是设计上的限制。所以我们需要另外找一个可以提供对本地二进制文件的访问的COM对象。
ADO Stream对象（MDAC 2.5中的组件）提供了读、写和管理二进制流数据的手段。字节流的内容可以是文本，或者二进制数据，并且没有容量上的限制。在ADO 2.5中，Microsoft对Stream对象的介绍不属于ADO对象结构的任何一层，所以，我们无需捆绑即可使用该对象。
本文中使用Stream对象来访问文件内容，再把内容存入XML节点。
客户端
以下示例代码使用Stream和MSXML对象完成文件上传动作。
<HTML><HEAD><TITLE>File Send</TITLE></HEAD><BODY><INPUT id=btn_send name="btn_send" type=button value="FILE SEND"><DIV id=div_message>Ready</DIV></BODY></HTML>
<SCRIPT LANGUAGE=JavaScript>// 上传函数function btn_send.onclick(){// 创建 ADO-stream 对象var ado_stream = new ActiveXObject("ADODB.Stream");// 创建包含默认头信息和根节点的 XML文档var xml_dom = new ActiveXObject("MSXML2.DOMDocument");xml_dom.loadXML('<?xml version="1.0" ?> <root/>');// 指定数据类型xml_dom.documentElement.setAttribute("xmlns:dt", "urn:schemas-microsoft-com:datatypes");// 创建一个新节点，设置其为二进制数据节点var l_node1 = xml_dom.createElement("file1");l_node1.dataType = "bin.base64";// 打开Stream对象，读源文件ado_stream.Type = 1; // 1=adTypeBinaryado_stream.Open();ado_stream.LoadFromFile("c:\tmp\myfile.doc");// 将文件内容存入XML节点l_node1.nodeTypedValue = ado_stream.Read(-1); // -1=adReadAllado_stream.Close();xml_dom.documentElement.appendChild(l_node1);// 可以创建多个二进制节点，一次上传多个文件// 把XML文档发送到Web服务器var xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");xmlhttp.open("POST","./file_recieve.asp",false);xmlhttp.send(xml_dom);// 显示服务器返回的信息div_message.innerHTML = xmlhttp.ResponseText;}</SCRIPT>
服务器端
以下代码使用相同的对象提供服务器端的上传处理功能。
<%@ LANGUAGE=VBScript%><% Option ExplicitResponse.Expires = 0' 定义变量和对象。dim ado_streamdim xml_domdim xml_file1' 创建 Stream 对象set ado_stream = Server.CreateObject("ADODB.Stream")' 从Request对象创建 XMLDOM对象set xml_dom = Server.CreateObject("MSXML2.DOMDocument")xml_dom.load(request)' 读出包含二进制数据的节点set xml_file1 = xml_dom.selectSingleNode("root/file1")' 打开Stream对象，把数据存入其中ado_stream.Type = 1 ' 1=adTypeBinaryado_stream.openado_stream.Write xml_file1.nodeTypedValue' 文件存盘ado_stream.SaveToFile "c:mpupload1.doc",2 ' 2=adSaveCreateOverWriteado_stream.close' 销毁对象set ado_stream = Nothingset xml_dom = Nothing' 向浏览器返回信息Response.Write "Upload successful!"%>
也可以使用Stream对象把数据放到数据库的BLOB型字段中。
使用该方法的益处
