121044246 发表于 2014-4-12 21:34:57

【已解决】求教读取access某字段所有数值，怎么样求和呢？

本帖最后由 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

auto 发表于 2014-4-13 17:04:33

select * --->>> select sum(金额) from ...

这句不报错吗？？？$RS.open("SELECT * FROM " & $tblname & " WHERE 金额")

121044246 发表于 2014-4-13 20:05:36

回复 2# auto


    不报错，在while内循环显示每行金额的数值

auto 发表于 2014-4-14 21:53:54

回复 3# 121044246


    where 金额 这个有什么意义？？

121044246 发表于 2014-4-14 23:11:53

回复 4# auto


   金额表的字段其中一项。。就是想读取这个字段的所有值相加到一起

chzj589 发表于 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)

auto 发表于 2014-4-15 20:15:10

回复 5# 121044246


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

例如 查金额大于1，，可以where 金额>1如果不限制，“where 金额”就是多余的

121044246 发表于 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



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

121044246 发表于 2014-4-15 21:58:58

回复 7# auto


    我试想过把每个‘金额的值&+’用filewrite写入文本保存。最终得出就是金额1+金额2+金额3+.....金额N
最后用MsgBox返回，但是回显出来不是数值总和而是文本保存的金额1+金额2+金额3+.....金额N
格式。。

chzj589 发表于 2014-4-16 10:50:54

是不是这样子：




121044246 发表于 2014-4-16 11:58:49

回复 10# chzj589


    想把所有的数值都加起来求出总金额

chzj589 发表于 2014-4-16 12:05:06

金额数值有写入数据库吗？

chzj589 发表于 2014-4-16 12:06:43

回复 11# 121044246

121044246 发表于 2014-4-16 12:10:56

回复 13# chzj589


    如果不想要多一个合计的列.直接算出金额的和可以吗

chzj589 发表于 2014-4-16 12:21:18

回复 14# 121044246
页: [1] 2
查看完整版本: 【已解决】求教读取access某字段所有数值，怎么样求和呢？