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,030

HOME > ASP > ASP Forum > คำสั่ง การขึ้นหน้า rs.pagesize=10 totalpage = rs.PageCount If pageno > 1 or



 

คำสั่ง การขึ้นหน้า rs.pagesize=10 totalpage = rs.PageCount If pageno > 1 or

 



Topic : 004672

Guest




rs.pagesize=10
totalpage = rs.PageCount
If pageno < 1 or Cint(pageno) > Cint(totalpage) Then pageno = 1 End if
rs.AbsolutePage = pageno

Cint คือคำสั่งอะไร ทำงานยังไง ช่วยอธิบายด้วยนะคือไม่เข้าใจคำนี้เลยจิง ๆ

คือ กำลังจะทำการดึงข้อมูลจาก DataBase แล้วทำการแสดงเป็นหน้ามีปัญหาตรงที่ เมื่อต้องการเปิดหน้าที่ 2 หรือ หน้าถัดไป ทำให้ Error แต่หน้าแรกแสดงผล เลยอยากทราบวิธีแก้ไข


Tag : - - - -







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 7 ก.ค. 2548 15:59:32 By : siriukan View : 3542 Reply : 4
 

 

No. 1

Guest


Cint เป็นฟังก์ชัน แปลงข้อมูลเป็น จำนวนเต็มครับ Cint=Convert Integer นั่นเอง






Date : 7 ก.ค. 2548 16:08:13 By : tong
 


 

No. 2

Guest


<%
if session("user")<>"" and session("pass")<>"" then

PageSize=15 'กำหนดการแสดงผลต่อ 1 หน้า
if Request.QueryString("PageNo")="" then
PageNo=1 'ถ้าไม่มีการระบุหน้าเลขหน้า กำหนดให้เป็นหน้า 1
else
PageNo=Request.QueryString("PageNo") 'ตัวแปรระบุตำแหน่งหน้ารับค่าที่ส่งมา
end if
sql="SELECT * FROM activity ORDER BY dates DESC,act_id DESC"
Set RS =Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 1,3

Rs.PageSize=PageSize 'กำหนดขนาดการอ่านข้อมูลต่อ 1 หน้า
PageCount=Rs.PageCount 'นับจำนวนหน้าที่แบ่งแล้วทั้งหมด
Rs.AbsolutePage=PageNo 'กำหนดให้ Rs เปิดข้อมูลจาก
%>
</font>
<table width = "677" border = 0 align="center" cellpadding = 1 cellspacing = 0 bgcolor = "#000000">
<tr bgcolor = "#FFFFFF">
<td align = "center"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>มีทั้งหมด
&nbsp; &nbsp;&nbsp;<%=rs.PageCount%> &nbsp;&nbsp;หน้า</font></td>
<td align = "center"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>หน้าที่
&nbsp; &nbsp;&nbsp;<%=pageno%></font></td>
<td align = "center"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>จาก
&nbsp; &nbsp;&nbsp;<%=rs.PageCount%>&nbsp;&nbsp;หน้า</font></td>
<td align = "right"><font size="2" face="Microsoft Sans Serif">++&nbsp;<a href="addact.asp"><font color = "#000000"><b>เพิ่มข่าวกิจกรรมใหม่คลิกที่นี่</b></font></a>&nbsp;++</font></td>
</tr>
</table>
<table width = "677" border = 0 align="center" cellpadding = 1 cellspacing = 1 bgcolor = "#669933">
<tr bgcolor="#003366">
<td colspan = "6" align = "center"><font color = "#FFFFFF" face = "Microsoft Sans Serif" size = 2><b>ข่
า ว กิ จ ก ร ร ม</b></font></td>
</tr>
<tr bgcolor = "#840215">
<td align = "center" bgcolor = "#F0F0F0" width = "40"><font color = "#000000" face = "Microsoft Sans Serif" size = 2><b>ลำดับ</b></font></td>
<td align = "center" bgcolor = "#F0F0F0" width = "276"><font color = "#000000" face = "Microsoft Sans Serif" size = 2><b>หัวข้อข่าวกิจกรรม</b></font></td>
<td align = "center" bgcolor = "#F0F0F0" width = "139"><font color = "#000000" face = "Microsoft Sans Serif" size = 2><b>วันที่ลงข่าวกิจกรรม</b></font></td>
<td align = "center" bgcolor = "#F0F0F0" width = "122"><font color = "#000000" face = "Microsoft Sans Serif" size = 2><b>รายละเอียด/เว็บบอร์ด</b></font></td>
<td align = "center" bgcolor = "#F0F0F0" width = "50"><font color = "#000000" face = "Microsoft Sans Serif" size = 2><b>แก้ไข</b></font></td>
<td align = "center" bgcolor = "#F0F0F0" width = "31"><font color = "#000000" face = "Microsoft Sans Serif" size = 2><b>ลบ</b></font></td>
</tr>
<%
if rs.eof <> true then
rs.movefirst
Rs.PageSize=PageSize 'กำหนดขนาดการอ่านข้อมูลต่อ 1 หน้า
PageCount=Rs.PageCount 'นับจำนวนหน้าที่แบ่งแล้วทั้งหมด
Rs.AbsolutePage=PageNo 'กำหนดให้ Rs เปิดข้อมูลจาก


id=1
Do while not rs.eof and ID<=PageSize
pa=PageNo-1
pz=pa*PageSize
cnt=pz+id

%>
<tr>
<td align = "center" bgcolor = "#FFFFFF"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>&nbsp;<%=cnt%></font></td>
<td align = "left" bgcolor = "#FFFFFF"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>&nbsp;<%=mid(rs("head_act"),1,40)%> ...</font></td>
<td align = "left" bgcolor = "#FFFFFF"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>&nbsp;<%=rs("dates")%> </font></td>
<td align = "left" bgcolor = "#FFFFFF"><div align="center"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>&nbsp;<a href="actdetail.asp?act_id=<%=rs("act_id")%>"><img src="images/view.gif" width="20" height="20" border="0"></a>
</font></div></td>
<td align = "center" bgcolor = "#FFFFFF"><font size="2" face="Microsoft Sans Serif"><a href = "editact.asp?act_id=<%=rs("act_id")%>"><img src = "images/edit1%5B1%5D.gif" width="41" height="17" border = 0></a></font></td>
<td align = "center" bgcolor = "#FFFFFF"><font size="2" face="Microsoft Sans Serif"><a href = "deleteact.asp?act_id=<%=rs("act_id")%>"><img src = "images/delete.gif" border = 0></a></font></td>
</tr>
<%
rs.movenext
id =id+1
Loop
%>
</table>
<table width = "677" border = 0 align="center" cellpadding = 1 cellspacing = 1 bgcolor = "#669900">
<tr>
<td colspan=4 align=center bgcolor=#003366> <font size="2" face="Microsoft Sans Serif">
<% For i=1 to PageCount %>
<a href="adminactivity.asp?PageNo=<% =i %>"><font color="#FFFFFF">
<% =i %>
</font></A><font color="#FFFFFF"> | </font></font> <font size="2" face="Microsoft Sans Serif">
<% next %>
</font></td>
</tr>
</table>
<font size="2" face="Microsoft Sans Serif">
<%else%>
</font>
<table width = "677" border = 0 align="center" cellpadding = 1 cellspacing = 1 bgcolor = "#000000">
<tr>
<td width="600" colspan = "5" align = "center" bgcolor="#FFFFFF"><font color = "#000000" face = "Microsoft Sans Serif" size = 2>ไม่มีข้อมูลครับ</font></td>
</tr>
</table>
<font size="2" face="Microsoft Sans Serif">
<%end if%></table>
<%
else
%>
</font>
<table border = 0 cellspacing = 1 cellpadding = 1 bgcolor = "#000000" width = "677" align="center">
<tr>
<td align=center bgcolor=#003366> <font face="Microsoft Sans Serif" size="2" color="#FFFFFF">"Username
หรือ Password ไม่ถูกต้องกรุณา Login ใหม่ครับ"</font> </td>
</tr>
</table>
<META HTTP-EQUIV="REFRESH" CONTENT="3; URL= login.html">
<font size="2" face="Microsoft Sans Serif">
<%
end if
%>
</font>
</BODY>
</HTML>
ตัวอย่าง codeครับ
Date : 7 ก.ค. 2548 16:16:21 By : tong
 

 

No. 3



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

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

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

Cint อยู่ในช่วงไม่เกิน 2-3 หมื่นครับ จำได้ไม่แน่นอนครับ ถ้าเกินนั้นให้ใช้ CLng ครับ
Date : 7 ก.ค. 2548 16:33:56 By : @W_IN
 


 

No. 4

Guest


ขอบคุณมาก ๆ ที่ช่วยกันตอบ ตอนนี้ทำเสร็จแล้ว ขอบคุณมาก ๆ เลย ขอบคุณ
Date : 12 ก.ค. 2548 09:57:46 By : siriukan
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : คำสั่ง การขึ้นหน้า rs.pagesize=10 totalpage = rs.PageCount If pageno > 1 or
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ 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 00
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 อัตราราคา คลิกที่นี่