Ultra-long character intelligent paging - support HTM

zhaozj2021-02-16  180

In probably in 1999, I feel troublesome about the release of the article, but then I will play ASP does not. It will only be used. When you encounter a long file 10,000 words, the web page is a large length. Last year, when I did a general article and a news management system, I wrote a code for separation. Passed now. To explain: My article is entered into the web-based Hemleditor, just like the ABC code here is similar. So actually submitted the text of the HTML format. The corresponding processing is made to HTML and will not be cut in the HTML code. Another brother here has published one, the principle is the same, but I haven't seen it carefully, I don't know if there is something different. The code is as follows: -------------------------------------- 'Request form itemi_forder = request.form ( "I_Folder") I_Topic = Request.Form ( "I_Topic") I_Title = htmlencode (Request.Form ( "I_Title")) I_Body = Request.Form ( "body") I_Source = Request.Form ( "I_Source") I_Keyword = htmlencode (Request.form ("i_keyword")) i_ishot = Request.form ("ISHOT") if i_ishot = "" "" "" "") I_ISPIC = Request.form ("ISPIC") if i_ispic = "" Then i_Ispic = " N "i_pic = request.form (" insertimage ") i_body = replace (i_body," contentable = true "," contentable = false ")

'Check INPUT' ... 'GET PAGES, B = BODYB_LEN = LEN (i_body) b_pages = 1' = tempt_loop = true

Do while t_loop 'here loop multiple times, each 4000 points, calculate the page number and join the library. IF B_LEN> 4000 kiln_body = left (i_body, 4000) 'n = new'IF "" in n_bodyif instrument "> 0 and (len (n_body) - INSTRREV (N_body, " 0 and (len (n_body) - INSTRREV (N_BODY , "")) <400 kiln_body = left (n_body, INSTRRRRRRRRRRRRRRRRRREV (N_BODY, ".")> 0 and (n_body, ") - INSTRREV (n_body,") <400 kiln_body = left (n_body, INSTRREV (N_BODY, ")) ELSE IF INSTRREV (N_BODY,"; ")> 0 and (len (n_body) - INSTRREV (n_body,"; ")) <400 kiln_body = Left (n_body, ";")) ELSE IF INSTRRREV (N_BODY, ")> 0 and (len (n_body) - INSTRRRREV (N_BODY,", ")) <400 kiln_body = left (n_body, Instrrev (N_body, ",")) ELSE IF INSTRREV (N_BODY, ".")> 0 and (len (n_body) - INSTRRREV (n_body, ")) <400 kiln_body = left (n_body, instrib (n_body,". ")) End IFEND IFEND IFEND IFEND IFEND IFN_LEN = LEN (N_BODY) i_body = MID (i_body, n_len 1) b_len = len (i_body)

Elsen_body = i_bodyt_loop = false

'Add to databaseexec_prc_content_ins i_forder, i_topic, i_title, i_source, n_body, i_ispic, i_pic, i_ishot, i_keyword, b_pages

'One Function here, you can handle it yourself. Anyway, there are two, one is Body, one is B_PAGES, is the page number.

B_PAGES = B_PAGES 1 LOOP%> New page 1 </ title> <link rel = "stylesheet" type = "text / css" href = "../ CSS /default.css"></Head> (Body> "Div align =" center "> <center> <table border = 1 width =" 300 "height =" 128 "bordercolor =" # 000000 "Cellspacing =" 0 " Cellpadding = "0" style = "border-collapse: collapse"> <tr> <td bgcolor = "# DEDBD6" height = "31"> Enter success </ td> </ tr> <tr> <td height = " 96> <p align = "center"> This article copies <% = b_pages-1%> page </ td> </ TR> </ Table> </ center> </ div> <script> top.main_top .location.reload (); </ script> </ body></p></div><div class="text-center mt-3 text-grey"> 转载请注明原文地址:https://www.9cbs.com/read-8333.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="8333" 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.036</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 = 'g0iG8AhRvNSMqTQZTsV6FlKnsmkGU8Frdx_2Bmirt9vLv_2BJgDfmAH_2BINQFVTLoyl_2F8nEpKsF9J0b5MYSSofbcYOA_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>