台灣最大程式設計社群網站
線上人數
791
 
會員總數:245015
討論主題:188959
歡迎您免費加入會員
討論區列表 >> ASP >> ASP 最後一頁做總和統計
[]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
ASP 最後一頁做總和統計
價值 : 5 QP  點閱數:318 回應數:9

樓主

梅子
門外漢
0 5
60 6
發送站內信

目前顯示如下:
第一頁
欄位A  欄位B  欄位C
XXX  XXX  3
XXX  XXX  2
          時數總計:5
第二頁
欄位A  欄位B  欄位C
XXX  XXX  6
XXX  XXX  3
          時數總計:9
請問我要把爛位C的時數加總為14顯示在第二頁的時數總計欄位怎麼做?
程式碼如下:
accdb_RS.Pagesize = 10 ' 每頁要秀幾筆
If Request("page") > 0 Then
If CLNG(Request("page")) > accdb_RS.PageCount Then
page = accdb_RS.PageCount
Else
page = CLNG(Request("page"))
End If
Else
page = 1
End If

accdb_RS.AbsolutePage = page %>
<%
total=total+accdb_RS(5)


accdb_RS.MoveNext
NEXT
Response.Write"</table>"
%>
<table width='762' cellspacing="1" color='#000080'>
<tr><td>

<p align="right"><font color="#000080" face="微軟正黑體" size="4">時數小計:<%=total%></font></tr>
<tr><td>

 </tr>
</table>
<%
If page <> 1 Then
Response.Write"<td>" &"<a href=2019.asp?page=1><font><span style=text-decoration:none>第一頁</span></font></a>" &"<font size='4' color='blue'><b>&nbsp;|&nbsp;</b></font>"1
Response.Write"<td>" &"<a href=2019.asp?page="& (page-1)&"><font><span style=text-decoration:none>上一頁</span></font></a>" &"<font size='4' color='blue'><b>&nbsp;|&nbsp;</b></font>"
END IF
If page <> accdb_RS.PageCount Then
Response.Write"<td>" &"<a href=2019.asp?page="&(page+1)&"><font><span style=text-decoration:none>下一頁</span></font></a>" &"<font size='4' color='blue'><b>&nbsp;|&nbsp;</b></font>"
Response.Write"<td>" &"<a href=2019.asp?page="&accdb_RS.PageCount&"><font><span style=text-decoration:none>最後一頁</span></font></a>"
END IF

accdb_RS.Close
set accdb_RS = Nothing
cnn_DB.Close
set cnn_DB = Nothing
%>



搜尋相關Tags的文章: [ 總和 ] , [ 最後一頁 ] ,
本篇文章發表於2019-04-08 16:21
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
1樓
最有價值解答

老頑童
捐贈 VP 給 老頑童 檢舉此回應
土法鍊鋼

本篇文章回覆於2019-04-09 15:10
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
2樓
回應

老頑童
捐贈 VP 給 老頑童 檢舉此回應
更正, 後面的RS應是accdb_RS,請自行修改
本篇文章回覆於2019-04-09 15:12
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
3樓
作者回應

梅子
檢舉此回應
感謝1樓的大大
我有用您的方式做...
第一頁有出來..可是第二頁就跑500錯誤了
本篇文章回覆於2019-04-09 15:36
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
4樓
作者回應

梅子
檢舉此回應
請問是所有的RS都改還是是movenext那行做更正呢?
本篇文章回覆於2019-04-09 15:38
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
5樓
回應

老頑童
捐贈 VP 給 老頑童 檢舉此回應
2, 3, 5那幾行的全部都要改
本篇文章回覆於2019-04-09 15:51
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
6樓
作者回應

梅子
檢舉此回應
感謝大大
我有用您的方式做...
第一頁有出來..可是最後就跑500錯誤了,
我是把您給我的程式碼取代在total=total+accdb_RS(5)
裡面,還是我那邊該刪沒刪導致這段有誤??
本篇文章回覆於2019-04-09 15:55
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
7樓
作者回應

梅子
檢舉此回應

<%
if page = accdb_RS.PageCount then '判斷是不是最後一頁
accdb_RS.MoveFirst '移回第一筆
While not accdb_RS.EOF '跑迴圈加總
total=total+accdb_RS(5)
accdb_RS.MoveNext
Wend
Response.Write "時數總計:" & total
end if

NEXT
Response.Write"</table>"
%>


這段改成這樣後會變成第一頁的欄位A與爛位B的資料只會顯示第一筆,最後一頁只會有一筆,總計的數字是對的
本篇文章回覆於2019-04-09 16:05
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
8樓
回應

老頑童
捐贈 VP 給 老頑童 檢舉此回應
這段要放在你原本時數小計後面
不能取代原本的total=total+accdb_RS(5)
不然會影像原本的資料

<tr><td>
試著把它放在這個位置
</td>
 </tr>
</table>
本篇文章回覆於2019-04-09 16:43
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
9樓
作者回應

梅子
檢舉此回應
感謝大大,己經可以了
本篇文章回覆於2019-04-09 17:21
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
   
1

回覆
如要回應,請先登入.