Forgot Password ??

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

	Registered : 109,037

HOME > ASP > ASP Forum > ต้องการแบ่งหน้าแสดงสินค้าที่มีทั้งหมด 20 กว่าชิ้น ให้โชว์หน้าละ 5 ชิ้น

ต้องการแบ่งหน้าแสดงสินค้าที่มีทั้งหมด 20 กว่าชิ้น ให้โชว์หน้าละ 5 ชิ้น

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

Jumyut

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

ผมต้องการแบ่งหน้าแสดงสินค้าที่มีทั้งหมด 20 กว่าชิ้่น ให้โชว์หน้าละ 5 ชิ้น ตามเว็บนี้ http://www.koreabeautiful.com/category.asp?catid=39 โดยใช้ ASP + Access แต่ไม่รู้จะเขียน code ยังไง และแทรกตรงไหน

ตัวอย่าง code ที่ผมใ้ช้แสดงสินค้า category.asp

Code

<%
Dim catid, rs, sql, RecCount
catid = Request.QueryString("catid")
RecCount = 0
If Not IsNumeric(Trim(catid)) Then
Response.Write "<br><br><br><br>"
Response.Write "<p align=center><b>ไม่พบรายการสินค้าที่ต้องการ กรุณาเลือกหมวดหมู่สินค้าใหม่อีกครั้ง</b></p>"
Response.End
End If
If ConnectDB() = True Then
sql = "select * from products p inner join categories c on p.catid=c.catid " & _
"where p.catid="& catid &" And " & _
"p.pactive=True And c.catactive=True " & _
"order by pname"
Set rs = Conn.Execute(sql)
If rs.BOF Or rs.EOF Then
Response.Write "<br><br><br><br>"
Response.Write "<p align=center><b>ไม่พบรายการสินค้าที่ต้องการ กรุณาเลือกหมวดหมู่สินค้าใหม่อีกครั้ง</b></p>"
Response.End
End If
%>
<% Do While Not rs.EOF %><form method="post" action="sscart.asp">
</font>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="20%" align="center"><font face="MS Sans Serif" size="2"><a href="detail.asp?pid=<%=rs("pid")%>"><img src="pimages/<%=rs("pimages")%>" alt="click here in full details" border="0"></a>
</font></td>
<td width="80%" valign="top">
<div align="left"><font face="MS Sans Serif" size="2"><b>ชื่อสินค้า
:</b> <%=rs("pname")%><br>
<b>หมวดหมู่ :</b> <%=rs("catname")%><br>
<b>รายละเอียด :</b> <%=Replace(rs("pdescriptions"),vbCrLf,"<br>")%><br>
<b>ราคา :</b> <s><%=FormatNumber(rs("pprice"),2)%> บาท</s><br>
<b>ราคาพิเศษ : <font color="red"><%=FormatNumber(rs("pdiscount"),2)%>
</font> </b>บาท<br>
<input type="hidden" name="pid" value="<%=rs("pid")%>">
<input type="hidden" name="pname" value="<%=rs("pname")%>">
<input type="hidden" name="pdiscount" value="<%=rs("pdiscount")%>">
<input type="image" border="0" src="images/add2cart.png">
</font></div>
</td>
</tr>
<font face="MS Sans Serif" size="2"></form></font>
</table>
<hr noshade>
<font face="MS Sans Serif" size="2">
<%
RecCount = RecCount + 1
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
End If
%>

Tag : ASP

ประวัติการแก้ไข
2012-04-18 10:27:06

Date : 2012-04-18 10:26:01

By : Jumyut

View : 1671

Reply : 3

No. 1

TC Admin

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

Go to : ASP Microsoft Access List Record Paging/Pagination

Date : 2012-04-18 11:16:55

By : webmaster

No. 2

Jumyut

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

ขอบคุณครับ

Date : 2012-04-19 08:15:21

By : Jumyut

No. 3

TC Admin

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

อันทีจริงใช้การค้นหาก็เจอแล้วครับ

Date : 2012-04-19 10:24:38

By : webmaster

ค้นหาข้อมูล

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

Re : ต้องการแบ่งหน้าแสดงสินค้าที่มีทั้งหมด 20 กว่าชิ้น ให้โชว์หน้าละ 5 ชิ้น

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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