zoukankan
html css js c++ java
在function中使用recordset对象
function
GetTotalFee(rsObj)
set
rs
=
rsobj
allsum
=
0
rs.Movefirst
while
not
rs.eof
daysum
=
0
for
i
=
6
to
rs.fields.count
-
8
if
instr
(
lcase
(rs.fields(i).name),
"
remark
"
)
=
0
then
if
Not
IsNull
(rs(rs.fields(i).name))
then
if
cint
(
trim
(rs(rs.fields(i).name)))
<>
0
then
daysum
=
daysum
+
cint
(
trim
(rs(rs.fields(i).name)))
'
Response.write daysum&"<br>"
end
if
end
if
end
if
next
allsum
=
allsum
+
cint
(daysum)
rs.MoveNext
wend
GetTotalFee
=
allsum
end function
sql_display
=
"
select * from expense where fileno ='
"
&
strBH
&
"
' order by expenseDate asc"
set
objDisplay
=
conn.
execute
(sql_display)
调用
<
%
=
GetTotalFee(objDisplay) %
>
查看全文
相关阅读:
[循环卷积]总结
[FFT/NTT/MTT]总结
[BZOJ 4870] 组合数问题
[BZOJ 4809] 相逢是问候
[BZOJ 4591] 超能粒子炮-改
__getattribute__
__repr__
__reduce__
数据库查询转excel小工具
Git常用操作
原文地址:https://www.cnblogs.com/king_astar/p/50601.html
最新文章
nuxt + ts +vue简单后台项目,记录一些在做的过程中遇到的问题。
js的一些总结
12.2 以上版本的IMP-00403问题
IMP-00009: abnormal end of export file
srvctl 操作数据库,报错:ORA-01017: invalid username/password; logon denied
GoldenGate异构的安装部署(从Oracle到MySQL)
Exadata重启时,主机很可能会hang住
ASM diskgroup中数据不均衡的另外一种可能原因
提升Exadata 计算节点本地IO性能
Exadata 高性能盘换成高容量盘
热门文章
遭遇ORA-04063
OI刷题记录(Updating)
DP Training(Updating)
Contest Reviews(Updating)
Needed Learning(Updating)
Template(Updating)
Questions(Updating)
Mistakes(Updating)
[二项式反演]总结
[后缀数组]总结
Copyright © 2011-2022 走看看