做一個(gè)簡單的ASP分頁程序
本程序主要用到Connection、RecordSet這兩個(gè)對(duì)象,程序中的數(shù)據(jù)庫為Access庫,采用OLEDB方式連接庫。
這個(gè)東西是作為菜鳥的我弄的一個(gè)東西.
你可以對(duì)這個(gè)東西不屑一顧.但是請(qǐng)記住: 菜鳥也有這個(gè)權(quán)利把自己的心得體會(huì)附注文字貢獻(xiàn)出來.....當(dāng)然,技術(shù)方面真的是好菜的..一些ASP中的比較正統(tǒng)的中規(guī)中矩的方法.我覺得這個(gè)東西可能對(duì)初學(xué)者有些幫助.......見笑了..
一個(gè)簡單的分頁教程:
<%
Set conn = Server.CreateObject("ADODB.Connection")
strcon="provider=microsoft.jet.oledb.4.0;data source="& _
server.mappath("mdb.mdb")
conn.Open strcon
Set rs = Server.CreateObject ("ADODB.Recordset")
sql="select * from table order by id desc"
rs.Open sql, conn, 1
page=1 ' 設(shè)置變量PAGE=1
rs.PageSize = 5 '每頁顯示記錄數(shù)
if Not IsEmpty(Request("Page")) then '如果PAGE已經(jīng)初始化...
Page = CInt(Request("Page")) '接收PAGE并化為數(shù)字型賦給PAGE變量
if Page > rs.PageCount then '如果接收的頁數(shù)大于總頁數(shù)
rs.AbsolutePage = rs.PageCount '設(shè)置當(dāng)前顯示頁等于最后頁
elseif Page <= 0 then '如果page小于等于0
Page = 1 '設(shè)置PAGE等于第一頁
else
rs.AbsolutePage = Page '如果大于零,顯示當(dāng)前頁等于接收的頁數(shù)
end if
End if
Page = rs.AbsolutePage
%>
<%
For i = 1 to rs.PageSize
if rs.EOF then
Exit For
end if '利用for next 循環(huán)依次讀出記錄
%>
做一個(gè)簡單的ASP分頁程序
本程序主要用到Connection、RecordSet這兩個(gè)對(duì)象,程序中的數(shù)據(jù)庫為Access庫,采用OLEDB方式連接庫。這個(gè)東西是作為菜鳥的我弄的一個(gè)東西.你可以對(duì)這個(gè)東西不屑一顧.但是請(qǐng)記住: 菜鳥也有這個(gè)權(quán)利把自己的心得體會(huì)附注文字貢獻(xiàn)出來...當(dāng)然,技術(shù)方面真的是好菜的..一些ASP中的比較正統(tǒng)的中規(guī)中矩的方法.我...
asp數(shù)字分頁
'rssql = "select count(id) from `table1`"'rs.open rssql,conn,0,1,&h0001 if request("cord")=1 then
ASP的分頁如何弄?
要實(shí)現(xiàn)ASP.NET中的分頁功能,首先需要設(shè)置數(shù)據(jù)集的每頁記錄數(shù),可以通過設(shè)置rs.PageSize來實(shí)現(xiàn),例如設(shè)置為10。接著,通過設(shè)置當(dāng)前所在頁數(shù)來獲取當(dāng)前頁面的記錄,可以使用rs.AbsolutePage屬性,比如設(shè)置為1來獲取第一頁的記錄。實(shí)現(xiàn)過程可以參考以下鏈接,這里有詳細(xì)的教程幫助理解:http:\/\/www.21shipin.com...
asp頁面內(nèi)容分頁顯示
currentPage=1 end if sql1="select * from s order by id desc"set cn1=server.CreateObject("ADODB.RecordSet")cn1.open sql1,conn1,1,1 rs.move (currentPage-1)*rs.pagesize i=1 while not cn1.eof response.Write""response.Write ""&cn1("id")&""response.Write ""&cn1("ccc"...
asp.NET分頁如何實(shí)現(xiàn)?
1、首先來了解Asp.Net分頁控件——AspNetPager以及控件的屬性。CurrentPageIndex\/\/當(dāng)前頁數(shù)(頁碼)RecordCount \/\/總數(shù)據(jù)條數(shù) PageSize \/\/每頁數(shù)據(jù)條數(shù) PageCount \/\/總的頁數(shù) 當(dāng)然還有一些特別“人性化”的屬性可以設(shè)置。2、接下來就是給控件屬性賦值就可以了,通過Sql語句查詢到數(shù)據(jù)庫中的數(shù)據(jù),SqlDataAdapter...
asp分頁代碼
if p>1 then show=show+" "else show=show+" "end if if p<PCount then show=show+" "else show=show+" "end if if p>=PCount then show=show+"
ASP分頁代碼
 n=n+1 rs.movenext '顯示頁面的數(shù)據(jù) wend > <span class="STYLE8">共:<%=tatalpages%>頁當(dāng)前為:<%=nowpage%>頁 <%if nowpage>1 then%> <a href="no.asp?page=<%=nowpage-1%>">上一頁 <%else%> 上一頁 <%end if%> <%for k=1 to tatalpages%> <%if k<&...
asp.net 怎么分頁
如果GridView是直接綁定數(shù)據(jù)庫,則很簡單:只要點(diǎn)擊GridView空間左上角的小三角形,再彈出的選項(xiàng)中,將"啟動(dòng)分頁"打上勾即可。 如果是用代碼實(shí)現(xiàn),則需要這么做: 1、允許分頁:設(shè)置AllowPaging=True; 2、設(shè)置GridView屬性欄中PagerSetting里的一些屬性中,定義分頁的樣式; 3、數(shù)據(jù)部署:將...
asp.net中repeater簡單的分頁
<\/asp:DropDownList>頁 第二、在后臺(tái)實(shí)現(xiàn)分頁 private PagedDataSource pds(){ string connstring = ConfigurationManager.ConnectionStrings["pconn"].ConnectionString;SqlConnection con = new SqlConnection(connstring);DataSet ds = new DataSet();SqlDataAdapter sda = new SqlDataAdapter("select * fro...
透徹掌握ASP分頁技術(shù)
首先 來看看效果 !看看功能 分頁程序首先讀取每頁預(yù)置的記錄條數(shù) 在此是 條 其它將在下頁中顯示 同時(shí)提示當(dāng)前頁數(shù) 總頁數(shù) 總記錄數(shù) 當(dāng)顯示的頁數(shù)為第一頁時(shí) 首頁 上一頁 鏈接失效 當(dāng)顯示的頁數(shù)為最后頁時(shí) 下一頁 尾頁 鏈接失效 接下來 以實(shí)例的方式告訴大家怎么一步步的做出這種分頁效果 首先 ...
相關(guān)評(píng)說:
秭歸縣阻抗: ______ 本人用c#加asp.net做了一個(gè)新聞分頁,相當(dāng)簡單. 一:在網(wǎng)頁頁面上放兩個(gè)label控件 二:在后臺(tái)代碼里這樣寫: private void Page_Load(object sender, System.EventArgs e) { if(!this.IsPostBack) { shownews(Label1,Label2,"關(guān)于asp的分頁"...
秭歸縣阻抗: ______ 可以按照每頁顯示字?jǐn)?shù)來顯示,只要一個(gè)字符截取類就可以實(shí)現(xiàn),就不多做介紹了 還可以自定義分頁符,在向數(shù)據(jù)庫添加數(shù)據(jù)時(shí),把分頁符加到想要分頁的地方,在顯示頁用split函數(shù)將文章分段去出來,每一段就是一頁 這里就簡單的介紹一下思想,如果要代碼,可以聯(lián)系我.Q987280972
秭歸縣阻抗: ______ 有幾種方法:一、你在你的新聞內(nèi)容中插入一個(gè)分布標(biāo)簽比如:[NewsPages],你想要到哪里分頁,就到哪個(gè)地方插入這個(gè)標(biāo)簽,然后再在你輸入新聞內(nèi)容的時(shí)候按 [NewsPages]這個(gè)標(biāo)簽來分隔內(nèi)容就可以了.二、就是按字?jǐn)?shù)來進(jìn)行分頁,比如...
秭歸縣阻抗: ______ 加個(gè)PageNo參數(shù),SQL查詢后跳過去就OK了.
秭歸縣阻抗: ______ 看看我的分頁代碼吧 <% exec="select * from bearfriend order by ID desc" set rs=server.createobject("adodb.recordset") rs.open exec,conn,1,1 rs.pagesize=5 ps=rs.pagesize num=rs.recordcount allpage=rs.pagecount if trim(request("page"...
秭歸縣阻抗: ______ <%'=============分頁定義開始,可放在數(shù)據(jù)庫打開前或后dim actionaction=request.QueryString("action") ConstMaxPerPage=6 '定義每頁顯示記錄數(shù),可根據(jù)實(shí)際自定義dimtotalPut dim CurrentPagedim TotalPagesdim sqlif Not isempty(...
秭歸縣阻抗: ______ % Set conn=Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("新聞.mdb") Set rst=Server.CreateObject("ADODB.Recordset") '創(chuàng)建Recordset對(duì)象 sql=...
秭歸縣阻抗: ______ 第一步分頁 第二步css定義一行的寬度能容三個(gè)圖片,并設(shè)置圖片F(xiàn)LOAT: left屬性 第三步 圖片就會(huì)一行3個(gè)地自動(dòng)排例下去了
秭歸縣阻抗: ______ DataList分頁的話需要后臺(tái)代碼用GridView自帶分頁
秭歸縣阻抗: ______ 如果你是用VB.net來做,放一個(gè)datagrid控件,雙擊空白處,在最上面打imports system.data.oledbfrom1_load上面打:dim connstr as string="proviede=MIcrosoft.jet.oledb.4.0;data source=f:\數(shù)據(jù)庫的地址\sta.mdb" Dim myconn As New ...