ASP page technical source code

xiaoxiao2021-03-06  40

ASP paging source [Author: Anonymous Copy from: Site author Hits: 2502 Update Time: 2003-9-26 article entry: lgysm] Top hot ★

<% '' This program file name: pages.asp%> <% '' contains ADO constant table file Adovbs.inc, can copy% from "/ Program Files / Common file / system / ado" directory> <% '* Setting up a database connection, here is Oracle8.05 database set conn = server.createObject ("adodb.connection" conn.open "provider = msdaora.1 ; Data Source = YourSrcName; User ID = YourUserID; Password = YourPassword; "set rs = Server.CreateObject (" ADODB.Recordset ") '' Create recordset object rs.CursorLocation = adUseClient '' sets the recording current pointer attribute '' * Set the total number of records in one page, can adjust rs.pagesize = 10 '' * set up query statement strsql = "SELECT ID, name, address, phone from address book" ropen strsql, conn, AdoPenStatic, AdlockReadOnly, AdcmdText%> Page Sample </ title> <script language = & # 106avascript> // Click "[1]" response: function pagefirst () {document. } // click response "[Prev]" MyForm.CurrentPage.selectedIndex = 0;; document.MyForm.CurrentPage.onchange (): function PagePrior () {document.MyForm.CurrentPage.selectedIndex--; document.MyForm .Currentpage.onchange ();} // Click "[Next]" Response: Function PAG eNext () {document.MyForm.CurrentPage.selectedIndex ; document.MyForm.CurrentPage.onchange ();} // click '[Last Page] "response: function PageLast () {document.MyForm.CurrentPage.selectedIndex = document .Myform.currentpage.Length-1; Document.myform.currentPage.onChange ();} // Select " Page "Response: Function PageCurrent () {//pages.asp is the file name Document.myForm.Action = 'Pages.asp? Page ='</p> <p> (Document.myform.currentPage.SelectedIndex 1) Document.myform.Submit ();} </ script> </ head> <body bgcolor = "# fffcc" link = "# 008000" VLINK = "# 008000" Alink = "# Ff0000"> <% if xi e = # = # = # 000080> [Not recorded in the database!] </ Font> ") Else '' Specifies the current page of IF Request ("Currentpage") = "" "" "")) End if '' creates form myform, method is get response.write ("<form method = get name) = MyForm> ") Response.write (" <p align = center> <font size = 2 color = # 008000> ") 'Settings Temping Hyperlink if ife.pagecount = 1 Then Response.write (" [first Page] [Previous] [Next] [Last Page] ") Else if rs.absolution = 1 Then Response.write (" [1] [Previous] ") Response.write (" [" <a href=/106avascript:pagenext () Next Page </A>] ") Response.write (" [<a href=) ("> The last page of the first page </a>] Else if rs.absolutepage = rs.pagecount dam = rs.write ("[<a href=)") Respon, first page </A>] ") Respon SE.WRITE ("[<a href=)") Response.write ("[Next Page]") Else Response.Write ("[Next Page]") "[<a href=)"] ") response.write (" [<a href=) ") Response.write (" [<a href=) "[<a href=) "</p> <p>) Response.write ("[<a href=)" Next page </A>] ") response.write (" [<a href=) ("[<a href=#106avaScript:pagelast() The last page </a>] ") End if end if end if '' creates a drop-down list box for selecting a browsing page rate. Response.write (" Book <select size = 1 Name = currentpage οnchange = pagecurrent () "for i = 1 TO RS.PAGECOUNT IF RS.ABSOLUTEPAGE = I THEN response.write ("<option>" & I & "</ option>") '' current page ELSE RESPONSE.WRITE ("<option>" & I & "</ option> ") End if next response.write (" </ select> page / total "& rs.pagecount &" page "& rs.recordcount &" record </ font> <p> ") response.write (" </ form> " ) '' Creation form for display response.write ("<table align = center cellspacing = 1 cellpadding = 1 border = 1") Response.write ("BorderColor = # 99ccff bordercolordark = # b0e6 bordercolorlight = # 000066>") Response.write ("<tr bursolor = # ccccff bordercolor = # 000066>") Set columns = rs.fields '' display head for i = 0 to columns.count-1 response.write ("<TD align = center width = 200 height = 13> ") Response.write ("<font size = 2> <b>" & columns (i) .Name & "</ b> </ font> </ td>") Next Response.write ("</ TR>") '' Display content for i = 1 to rs.pagesize response.write ("<tr bursolor = # 99ccff bordercolor = # 000066>) for j =</p></div><div class="text-center mt-3 text-grey"> 转载请注明原文地址:https://www.9cbs.com/read-69752.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="69752" 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.048</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 = 'ep4lMSEEbRt7JpWNUAIpmlu7nIrRX15cSnjffXCU1Ao_2Fk2m_2B4FEazsIP5YO06JHGPeDIOkQnsCXE2cc_2BTJiW4Q_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>