找回密码
 加入
搜索
查看: 10641|回复: 26

[效率算法] 【已解决】求教读取access某字段所有数值,怎么样求和呢?

 火.. [复制链接]
发表于 2014-4-12 21:34:57 | 显示全部楼层 |阅读模式
本帖最后由 121044246 于 2014-4-18 10:00 编辑

求教读取access某字段所有数值,怎么样求和呢?
已解决,谢谢各位的热心回复  $total += $RS.Fields(6).value;逐行相加
;~                         $tblname = GUICtrlRead($maijia)
                         $addfld = ObjCreate("ADODB.Connection")
                         $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & $mdb_data_path)
                         $RS = ObjCreate("ADODB.Recordset")
                         $RS.ActiveConnection = $addfld
                         $RS.open("SELECT * FROM " & $tblname & " WHERE 金额")
                                  Local $total = 0 ;总和
                       While Not $RS.eof And Not $RS.bof
                                 If @error = 1 Then ExitLoop
                                $total += $RS.Fields(6).value;逐行相加
                                 $RS.movenext
                        WEnd
                        $RS.close
                        $addfld.close
发表于 2014-4-13 17:04:33 | 显示全部楼层
select * --->>> select sum(金额) from ...

这句不报错吗???$RS.open("SELECT * FROM " & $tblname & " WHERE 金额")
 楼主| 发表于 2014-4-13 20:05:36 | 显示全部楼层
回复 2# auto


    不报错,在while内循环显示每行金额的数值
发表于 2014-4-14 21:53:54 | 显示全部楼层
回复 3# 121044246


    where 金额 这个有什么意义??
 楼主| 发表于 2014-4-14 23:11:53 | 显示全部楼层
回复 4# auto


   金额表的字段其中一项。。就是想读取这个字段的所有值相加到一起
发表于 2014-4-15 14:27:57 | 显示全部楼层
$a=$RS.Fields(1).value
$a1=$RS.Fields(2).value
$a2=$RS.Fields(3).value
$a3=$RS.Fields(4).value
$a4=$RS.Fields(5).value
$b=$a+$a1+$a2+$a3+$a4
MsgBox(64,"每行的金额",$b)
发表于 2014-4-15 20:15:10 | 显示全部楼层
回复 5# 121044246


    where 金额 ??
    这个要加个条件啊,要不只有金额有什么用?而且还不报错

例如 查金额大于1,,可以where 金额>1  如果不限制,“where 金额”就是多余的
 楼主| 发表于 2014-4-15 21:54:23 | 显示全部楼层
回复 7# auto
$RS.open("SELECT * FROM " & $tblname & " WHERE 金额")

;~                         While Not $RS.eof And Not $RS.bof

;~                                 If @error = 1 Then ExitLoop

;~                                 MsgBox(64,"每行的金额",$RS.Fields(6).value);想把每行的金额相加求和,要怎样写呢?

;~                                 $RS.movenext



    这个代码是返回表中所有字段为‘金额’的值。就是不明白怎么加到一起求和。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
 楼主| 发表于 2014-4-15 21:58:58 | 显示全部楼层
回复 7# auto


    我试想过把每个‘金额的值&+’用filewrite写入文本保存。最终得出就是金额1+金额2+金额3+.....金额N
最后用MsgBox返回,但是回显出来不是数值总和而是文本保存的金额1+金额2+金额3+.....金额N
格式。。
发表于 2014-4-16 10:50:54 | 显示全部楼层
是不是这样子:




本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
 楼主| 发表于 2014-4-16 11:58:49 | 显示全部楼层
回复 10# chzj589


    想把所有的数值都加起来求出总金额
发表于 2014-4-16 12:05:06 | 显示全部楼层
金额数值有写入数据库吗?
发表于 2014-4-16 12:06:43 | 显示全部楼层
回复 11# 121044246

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
 楼主| 发表于 2014-4-16 12:10:56 | 显示全部楼层
回复 13# chzj589


    如果不想要多一个合计的列.直接算出金额的和可以吗
发表于 2014-4-16 12:21:18 | 显示全部楼层
回复 14# 121044246

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-25 09:23 , Processed in 0.090607 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表