Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > ASP > ASP Forum > ขอท่านผู้รู้ช่วยแก้โค๊ตให้แสดงจากหน้าสุดท้ายก่อนแล้วไล่ไปหน้าที่หนึ่งหน่อยครับ

ขอท่านผู้รู้ช่วยแก้โค๊ตให้แสดงจากหน้าสุดท้ายก่อนแล้วไล่ไปหน้าที่หนึ่งหน่อยครับ

เริ่มหัวข้อใหม่

Guest

ผมกำลังหัดศึกษา asp เลยเอาโค๊ตในบทเรียนไปลองทำดู อยากให้แสดงจากหน้าสุดท้ายก่อนนะครับ
เป็นการไล่ปัจจุบันไปหาอดีตนะครับ พอดีว่าโค๊ตนี้ไล่อดีตไปหาปัจจุบัน ซึ่งที่กรอกที่หลังจะไปอยู่หน้าท้ายๆๆนะครับ ขอท่านผู้รู้ช่วยหน่อยนะครับ จะเป็นพระคุณอย่างยิ่งครับ ขอบคุณมากครับ

<%
pageLen = 2 'กำหนดจำนวนแต่ละหน้าที่ต้องการแสดงกี่ Reccord
pageNo = request.QueryString("pageNo")
if pageNo="" then pageNo = 1
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("db/product.mdb"),"" , ""
'หรือจะใช้เป็น Conn.Open "product","",""
sql ="Select * From product"
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql,Conn,1,3
Nrecord=RS.recordcount
Rs.pageSize = pageLen
totalPage = Rs.PageCount
Rs.absolutePage = pageNo

If Rs.EOF Then
%>
ไม่มีข้อมูลในตาราง !
<%Else%>
<table border="1">
<tr bgcolor="Silver">
<td>id</td>
<td>barcode</td>
<td>Description</td>
<td>Price</td>
<td>Page</td>
<td>writer</td>
</tr>
<%
recNo=1
Do While Not RS.EOF and recNo <= pageLen
%>
<tr>
<td><%= Rs("Id")%></td>
<td><%= Rs("barcode")%></td>
<td><%= Rs("description")%></td>
<td><%= Rs("price")%></td>
<td><%= Rs("page")%></td>
<td><%= Rs("writer")%></td>
</tr>
<%
recNo=recNo+1
RS.MoveNext
Loop
rs.close
conn.close
%>
</table>
<%
end if
%>
<br>
<br>
จำนวน: <%=Nrecord%> รายการ<br>
ขณะนี้อยู่หน้า <%=pageNo%> ในทั้งหมด <%=totalPage%> หน้า
<%
if cint(pageno) > 1 then %>
<br>
<a href="sample1.asp?pageNo=1">หน้าแรก</a>   <a href="sample1.asp?pageNo=<%=pageNo-1%>">ย้อนกลับ</a>
 
<% end if
if cint(pageno) < totalPage then %>
<a href="sample1.asp?pageNo=<%=pageNo+1%>">หน้าต่อไป</a>  <a href="sample1.asp?pageNo=<%=totalPage%>">หน้าสุดท้าย</a>
<%
end if
%>
<br>
กระโดดไปหน้า
<%for idx = 1 to totalPage
%>
<a href="sample1.asp?pageNo=<%=idx%>">
<% if idx=cint(pageno) then%>
<b><%=idx%></b>
<%else %>
<%=idx%>
<%end if%>
</a> 
<%
next%>

Tag : - - - -

Date : 7 พ.ย. 2550 18:41:28

By : กำลังฝึกเรียนรู้ asp

View : 1221

Reply : 2

No. 1

Guest

1 กลับข้อมูล ลำดับหน้า จาก น้อยไปหามากเหมือนเดิม
แถวๆ นี้นะ
-----------------------------------------
""
'หรือจะใช้เป็น Conn.Open "product","",""
sql ="Select * From product"
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql,Conn,1,3
-------------------------------------------

เปลี่ยน เป็น
sql="Select * From Product Order by ........... Desc;"
ตรงที่ละไว้คือฟิลด์ที่ต้องการให้เรียงลำดับจากมากไปหาน้อย

2 กลับเลขหน้าไม่ต้องกลับข้อมุล
if pageno="" then
if rs.recordcount mod pagelen >0 then
pageno = (rs.recordcount\pagelen)+1
else
pageno =rs.recordcount\pagelen
end if
end if

Date : 8 พ.ย. 2550 15:32:05

By : GTM

No. 2

Guest

ขอขอบคุณเป็นอย่างสูงครับสำหรับ คำแนะนำ ที่เป็นประโยชน์นะครับ

Date : 8 พ.ย. 2550 17:28:34

By : กำลังเรียนรู้ asp

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : ขอท่านผู้รู้ช่วยแก้โค๊ตให้แสดงจากหน้าสุดท้ายก่อนแล้วไล่ไปหน้าที่หนึ่งหน่อยครับ

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

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

Load balance : Server 04

Registered : 109,038

document.write("<font color=996600>[ASP]</font>"); ขอท่านผู้รู้ช่วยแก้โค๊ตให้แสดงจากหน้าสุดท้ายก่อนแล้วไล่ไปหน้าที่หนึ่งหน่อยครับ

No. 1

No. 2

ค้นหาข้อมูล

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

Notice

ขอท่านผู้รู้ช่วยแก้โค๊ตให้แสดงจากหน้าสุดท้ายก่อนแล้วไล่ไปหน้าที่หนึ่งหน่อยครับ