ASP + XML upload file

xiaoxiao2021-03-06  33

test.htm Upload File Table Single Page Code: File Send </ Title> </ head> <body> <input = filename name = filename type = file></p> <p><Input id = btn_send name = "btn_send" type = button value = "file send"> <div id = div_message> ready </ div> </ body> </ html></p> <p><Script language = javaScript></p> <p>// Upmit function function btn_send.onclick () {if (filename.value == ") {alert (" The file does not exist, or the file content is empty. "); Return false;} // Create an Ado-stream object VAR ADO_STREAM = New ActiveXObject ("AdoDb.Stream"); ​​// Create an XML document containing the default header information and root node VAR XML_DOM = New ActiveXObject ("msxml2.domdocument"); XML_DOM.LOADXML ('<? Xml Version = "1.0 "?> <root /> '); // Specify data type XML_DOM.DocumentElement.setttribute (" XMLns: DT "," URN: Schemas-Microsoft-COM: DataYpes)); // Create a new node and set it as Binary data node var file_body = xml_dom.createElement ("file_body"); file_body.DataType = "bin.base64"; // Open Stream object, read source file ado_stream.type = 1; // 1 = adtypebinary ado_stream.open () ; ado_stream.LoadFromFile (filename.value); // file contents into XML node file_body.nodeTypedvalue = ado_stream.Read (-1); // -1 = adReadAll ado_stream.Close (); xml_dom.documentElement.appendChild (file_body ); // // Create a new node, set it as a string type data var file_name = XML_DOM.CREATEEEEEEEMENT ("file_name"); file_name.DataType = "string"; // Store file name File_Name.NodeTypedValue = filename.value.tostring (); xml_dom.documentelement.Appendchild (file_name); // / / You can create multiple binary nodes, upload multiple files at a time</p> <p>// Send the XML document to the web server var xmlhttp = new activityXObject ("Microsoft.xmlhttp"); XMLHTTP.Open ("post", "./ Test.asp", false); xmlhttp.send (XML_DOM); // Display the information returned by the server div_message.innerhtml = xmlhttp.responseText;} </ script> <font size = 18> Test.asp upload file handler code:</p> <p><% @ Language = vbscript%> <% OPTION Explicit Response.expires = 0 'Defines variables and objects. DIM ADO_STREAM DIM XML_DOM, FILENAME DIM XML_FILE1, XML_FILE2</p> <p>'Creating a Stream Object Set Ado_Stream = Server.createObject ("AdoDB.Stream")' Create an XMLDOM object from the Request object set XML_DOM = Server.createObject ("msxml2.domdocument") XML_DOM.LOAD (Request)</p> <p>'Read the file name set XML_File2 = XML_Dom.selectsinglenode ("root / file_name") filename = parseFileName (cstr (xml_file2.nodetyped ")</p> <p>'Reads nodes containing binary data SET XML_FILE1 = XML_DOM.SELECTSINGLENODE ("root / file_body")</p> <p>'Open Stream object, wherein the data into ado_stream.Type = 1' 1 = adTypeBinary ado_stream.open ado_stream.Write xml_file1.nodeTypedvalue 'File Save dim filepath if right (server.mappath ( "upload"), 1) <> " / "then filepath = Server.mappath (" upload ") " / " filename else filepath = server.mappath (" upload ") filename end if ado_stream.SaveToFile filepath, 2 '2 = adSaveCreateOverWrite ado_stream.close' destroy the object Set ado_stream = nothing set XML_DOM = Nothing 'Returns the information to the browser Response.write "Upload Successful!" FileName</p> <p>Function ParsefileName (sfilein) Dim i for i = len (sfilein) To 1 step -1 if INSTR ("/", MID (Sfilein, I, 1)) Then Exit for next parsefilename = MID (Sfilein, i 1, len (sfilein) - i) End function%></p></div><div class="text-center mt-3 text-grey"> 转载请注明原文地址:https://www.9cbs.com/read-64487.html</div><div class="plugin d-flex justify-content-center mt-3"></div><hr><div class="row"><div class="col-lg-12 text-muted mt-2"><i class="icon-tags mr-2"></i><span class="badge border border-secondary mr-2"><h2 class="h6 mb-0 small"><a class="text-secondary" href="tag-2.html">9cbs</a></h2></span></div></div></div></div><div class="card card-postlist border-white shadow"><div class="card-body"><div class="card-title"><div class="d-flex justify-content-between"><div><b>New Post</b>(<span class="posts">0</span>) </div><div></div></div></div><ul class="postlist list-unstyled"> </ul></div></div><div class="d-none threadlist"><input type="checkbox" name="modtid" value="64487" checked /></div></div></div></div></div><footer class="text-muted small bg-dark py-4 mt-3" id="footer"><div class="container"><div class="row"><div class="col">CopyRight © 2020 All Rights Reserved </div><div class="col text-right">Processed: <b>0.046</b>, SQL: <b>9</b></div></div></div></footer><script src="./lang/en-us/lang.js?2.2.0"></script><script src="view/js/jquery.min.js?2.2.0"></script><script src="view/js/popper.min.js?2.2.0"></script><script src="view/js/bootstrap.min.js?2.2.0"></script><script src="view/js/xiuno.js?2.2.0"></script><script src="view/js/bootstrap-plugin.js?2.2.0"></script><script src="view/js/async.min.js?2.2.0"></script><script src="view/js/form.js?2.2.0"></script><script> var debug = DEBUG = 0; var url_rewrite_on = 1; var url_path = './'; var forumarr = {"1":"Tech"}; var fid = 1; var uid = 0; var gid = 0; xn.options.water_image_url = 'view/img/water-small.png'; </script><script src="view/js/wellcms.js?2.2.0"></script><a class="scroll-to-top rounded" href="javascript:void(0);"><i class="icon-angle-up"></i></a><a class="scroll-to-bottom rounded" href="javascript:void(0);" style="display: inline;"><i class="icon-angle-down"></i></a></body></html><script> var forum_url = 'list-1.html'; var safe_token = 'fWype2DMvh_2Bwjrbg2hK_2Fy3zboR6FKoa1CjixvOUo27pYxcbjfsgUUOLmfnOeb3PulsLQzhHAdQOld5fA'; var body = $('body'); body.on('submit', '#form', function() { var jthis = $(this); var jsubmit = jthis.find('#submit'); jthis.reset(); jsubmit.button('loading'); var postdata = jthis.serializeObject(); $.xpost(jthis.attr('action'), postdata, function(code, message) { if(code == 0) { location.reload(); } else { $.alert(message); jsubmit.button('reset'); } }); return false; }); function resize_image() { var jmessagelist = $('div.message'); var first_width = jmessagelist.width(); jmessagelist.each(function() { var jdiv = $(this); var maxwidth = jdiv.attr('isfirst') ? first_width : jdiv.width(); var jmessage_width = Math.min(jdiv.width(), maxwidth); jdiv.find('img, embed, iframe, video').each(function() { var jimg = $(this); var img_width = this.org_width; var img_height = this.org_height; if(!img_width) { var img_width = jimg.attr('width'); var img_height = jimg.attr('height'); this.org_width = img_width; this.org_height = img_height; } if(img_width > jmessage_width) { if(this.tagName == 'IMG') { jimg.width(jmessage_width); jimg.css('height', 'auto'); jimg.css('cursor', 'pointer'); jimg.on('click', function() { }); } else { jimg.width(jmessage_width); var height = (img_height / img_width) * jimg.width(); jimg.height(height); } } }); }); } function resize_table() { $('div.message').each(function() { var jdiv = $(this); jdiv.find('table').addClass('table').wrap('<div class="table-responsive"></div>'); }); } $(function() { resize_image(); resize_table(); $(window).on('resize', resize_image); }); var jmessage = $('#message'); jmessage.on('focus', function() {if(jmessage.t) { clearTimeout(jmessage.t); jmessage.t = null; } jmessage.css('height', '6rem'); }); jmessage.on('blur', function() {jmessage.t = setTimeout(function() { jmessage.css('height', '2.5rem');}, 1000); }); $('#nav li[data-active="fid-1"]').addClass('active'); </script>