Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,027

HOME > ASP > ASP Forum > ช่วยบอกวิธีแก้ Code ASP ที่แบ่งแสดงข้อมูลให้ทีครับ



 

ช่วยบอกวิธีแก้ Code ASP ที่แบ่งแสดงข้อมูลให้ทีครับ

 



Topic : 096659



โพสกระทู้ ( 218 )
บทความ ( 0 )



สถานะออฟไลน์
Facebook



ถ้าผมต้องการจะปรับ Code ที่แบ่งแสดงข้อมูล
ให้แสดงออกมาเป็น l 1 l 2 l 3 l.....l Last l Next>> และ <<Previous l 1 l 2 l 3 l.....l Last l Next>> อย่างไงครับ
และขอให้Codeที่แสดง "ลำดับที่" มันต่อๆกันไปยังหน้าถัดไปด้วยครับ

ของเดิมเป็นแบบนี้ครับ
Old

PageDIV.asp
<%
        PageSize=50  'กำหนดการแสดงผลต่อ 1 หน้า
        if Request.QueryString("PageNo")="" then
            PageNo=1
        else
            PageNo=Request.QueryString("PageNo")
        end if
%>
<table>
<tr>
          <td>ลำดับที่</td>
          <td>เลขประจำตัว</td>
          <td>ชื่อ%></td>
	         <td>หน่วยงาน</td>
          <td>ทีมงาน</td>
          <td>รายละเอียด</td>
</tr>
<%
		 ConnString = "PROVIDER=SQLOLEDB;DATA SOURCE=10.3.57.102;INITIAL CATALOG=Ecom;USER ID=sa;PASSWORD=password;"
		Set Conn = Server.CreateObject("ADODB.Connection")
		Conn.Open  ConnString

        SQL="Select * from ecom"

        Set Rs=Server.CreateObject("Adodb.RecordSet")
        Rs.Open SQL, Conn, 3,1

        Rs.PageSize=PageSize 
        PageCount=Rs.PageCount 
        Rs.AbsolutePage=PageNo

        nID=1

        Do while not Rs.Eof and nID<=PageSize
		
%>

<tr>
          <td><%=rs("id")%></td>
          <td><%=rs("tin")%></td>
          <td><%=rs("name")%></td>
	  <td><%=rs("pak")%></td>
          <td><%=rs("team")%></td>
          <td><%=rs("descrip")%></td>
</tr>

<%
     nID=nID+1
     Rs.MoveNext
     Loop

     Rs.Close
     Conn.Close
%>

</table>

<hr>

<%  For i=1 to PageCount %>
        l <a href="PageDIV.asp?PageNo=<% =i %>"><% =i %></A> |
<% next %>


ผมดู ASP SQL Server List Record Paging/Pagination แล้วยังคิดไม่ออกว่าจะเอามาใช้แก้อย่างไง
https://www.thaicreate.com/asp/asp-sql-server-list-record-paging.html



Tag : ASP







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2013-06-17 16:20:11 By : KT-Raiden View : 1302 Reply : 4
 

 

No. 1



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

อืม ตัวนี้ไม่มี Library ให้ด้วยซิครับ อาจจะต้องมานั่งเขียนพวก เงื่อนไขการแสดงผลเองน่ะครับ แต่ Logic อาจจะวุ่น ๆ นิดหน่อยครับ






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-06-17 17:15:25 By : mr.win
 


 

No. 2

Guest


Code (ASP)
<%
pageLen =10 'กำหนดจำนวนแต่ละหน้าที่ต้องการแสดงกี่ Reccord
pageNo = request.QueryString("page")
if pageNo="" then pageNo = 1

set rs = Server.CreateObject("ADODB.recordset")
sql="SELECT * FROM pm where tblAuthor ='" & Session("AfUsername") & "' and tblCat=3 order by tblDate_save DESC"
rs.Open sql, conn,1,3

If Rs.EOF Then
%>
ไม่มีข้อมูล
<%
Else
Mailrecord = Rs.recordcount
Rs.pageSize = pageLen
totalPage = Rs.PageCount
Rs.absolutePage = pageNo
%>
ใส่ข้อมูล อาจจะเป็นส่วนหัวของตาราง
<%
recNo=1
Do While Not RS.EOF and recNo <= pageLen
%>
ใส่ข้อมูลที่ต้องการแสดงตรงนี้
<%
recNo=recNo+1
If pageNo="1" Then
ResultsCount = recNo
Else
ResultsCount = (pageNo&"0")+recNo-10
End if
Scount = (pageNo&"0")-PageLen+1
Mcount = ResultsCount-1
RS.MoveNext
Loop
rs.close
conn.close
%>
อันนี้ปุ่มกด Previous page กับ Nextpage
<%
if cint(pageno) > 1 then %>
<input type="button" class="form-site2" value="Previous" onClick="window.location='pm.asp?mailbox=<%=mailbox%>&page=<%=pageNo-1%>'">
&nbsp;
<% end if
if cint(pageno) < totalPage then %>
<input type="button" class="form-site2" value="Next" onClick="window.location='pm.asp?mailbox=<%=mailbox%>&page=<%=pageNo+1%>'">
<%
end if
%>
<%
end if
%>

<!--ช่วงนี้แสดงสถานะ ว่าคุณอยู่หน้าไหนและ จากรายการไหน ถึง รายการไหน-->

หน้าที่ [<%=pageNo%> จากทั้งหมด <%=totalPage%>หน้า]&nbsp;&hearts;&nbsp;รายการที่ [<%=SCount%> - <%=MCount%>] จากทั้งหมด <%=Mailrecord%> รายการ


<!-- อันนี้คือลิงก์ไปหน้าต่างๆ -->
<%
if cint(pageno) > 1 then %>
<a href="pm.asp?mailbox=<%=mailbox%>&page=<%=pageNo-1%>"><b>&#171;Prev</b></a><%end if%><%for idx = 1 to totalPage
%>
<a href="pm.asp?mailbox=<%=mailbox%>&page=<%=idx%>" class="searchlink"><% if idx=cint(pageno) then%></a><b style="background-color: indigo; border: 1px solid #0C5444; padding-left: 2px; padding-right: 2px; padding-bottom: 1px;" class="lg-text"><font color=#ffffff><%=idx%></font></b><%else %><%=idx%><%end if%>&nbsp;
<%
next%><% if cint(pageno) < totalPage then %>
<a href="pm.asp?mailbox=<%=mailbox%>&page=<%=pageNo+1%>"><b>Next</b>&#187;</a>
<%
end if
%>

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-06-17 18:24:03 By : Democraze
 

 

No. 3



โพสกระทู้ ( 218 )
บทความ ( 0 )



สถานะออฟไลน์
Facebook

ตอบความคิดเห็นที่ : 1 เขียนโดย : mr.win เมื่อวันที่ 2013-06-17 17:15:25
รายละเอียดของการตอบ ::
แล้วจะต้องเขียนโค้ดอย่างไรดีครับ...

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-06-18 14:51:55 By : KT-Raiden
 


 

No. 4

Guest


ก็แค่เอาไปใส่ในของเดิมปรับตามอีกนิดหน่อยก็ใช้ได้ ลองก่อนแล้วค่อยว่าว่ามันไม่ได้ยังไง การแบ่งหน้ามันไม่ยาก
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-06-18 19:58:05 By : หามานาน
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ช่วยบอกวิธีแก้ Code ASP ที่แบ่งแสดงข้อมูลให้ทีครับ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 02
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่