Using XMLHTTP to get data from other pages

zhaozj2021-02-16  51

When we write the ASP code, everyone knows the data that can get the FORM form with POST or GET, then how do we get the data on other pages? This should be used by the XMLHTTP protocol. XMLHTTP is part of XMLDOM technology.

The following code is a very simple example, we use XMLHTTP technology, completely acquire the code of http://www.codetoad.com/-site home page, and output it in the page.

<% DIM Objxmlhttp, XML set XML = Server.createObject ("Microsoft.xmlhttp") XML.Open "get", "http://www.codetoad.com/", False 'Pull The Data From The Web Page XML. Send

Response.write "Here's the html we now have in our xml object" Response.write "


" Response.Write "

" Response.Write xml.responseText Response.Write "</ xmp > "Response.write" <BR> <BR> <BR> "Response.write" Now here's how the page looks: <BR> <BR> "Response.Write xml.responseText Set xml = Nothing%></p> <p>Here is another example</p> <p><% DIM ObjHTTP, Objxml, ObjxSlset Object ("Microsoft.xmlhttp") Objhttp.Open "get", "http://p.moreover.com/cgi-local/Page?c=pop Music% 20REVIEWS & O = XML ", falseobjhttp.send.com Objxml = Objhttp.responsexmlset Objxsl = Server.createObject (" Microsoft.xmLDom ") objxsl.async = false</p> <p>Objxsl.load (Server.MAppath ("style.xsl")))</p> <p>IF (objxsl.parseerror.errorcode = 0) Then response.write (objxsl)) Else Response.write "error:" & objxsl.parseerror.reason & "URL:" & objxsl.urlend</p> <p>Set objhttp = NothingSet objxml = NothingSet objxsl = nothing%></p> <p>Style.xsl: <xsl: stylesheet xmlns: xsl = "http://www.w3.org/tr/wd-xsl"> <xsl: template match = "/"></p> <p><html> <head> <title> moreover ... </ title> </ head> <body bgcolor = "ffffff"> <div align = "center> <table bgcolor =" ffffff "border =" 0 "cellpadding = "4" Cellspacing = "0" width = "100%"></p> <p><xsl: for-each select = "moreovernews / article"> <tr valign = "middle"> <TD align = "left" bgcolor = "ffffff"> <xsl: attribute name = "href"> <xsl: value- Of select = "url" /> </ xsl: attribute> <xsl: attribute name = "target"> _blank </ xsl: attribute> <xsl: value-of select = "headline_text" /> <xsl: attribute name = "Href"> <xsl: value-of select = "document_url" /> </ xsl: attribute> <xsl: attribute name = "target"> _blank </ xsl: attribute> <xsl: value-of select = "Source "/> <Xsl: attribute name =" href "> <xsl: value-of select =" access_registration "/> <xsl: attribute> <xsl: attribute name =" target "> _blank </ xsl: attribute> <xsl: value-of select = "access_status" /> <xsl: value-of select = "harvest_time" /> gmt </ td> </ TR> </ xsl: for-each> </ table> </ div > </ body> </ html> </ xsl: template> </ xsl: stylesheet></p></div><div class="text-center mt-3 text-grey"> 转载请注明原文地址:https://www.9cbs.com/read-24223.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="24223" 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.042</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 = 'VVzSU4_2FOIP_2F3MbClAoTaZPgDIsSNk2rvoKJBnyvagZXUcKCGcd6Pjtc_2FTJcgXqdQ33je_2FhRQGqhGDKFVBU_2B2Zw_3D_3D'; 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>