如何使下一级自动向上一级汇总数据？谢谢

qjw9004

如：
将自动将代码01XX自动加计到01
id        flbh        flxz        ysje        jc        bz
58        01        火法冶炼系统        ￥0.00        1       
60        0101        精矿调浆间        ￥0.00        2       
64        0101001        土建        ￥2,376,000.00        3       
65        0101002        工艺设备及安装        ￥1,250,828.00        3       
67        0101003        结构件及管道、阀门、管件        ￥96,000.00        3       
79        02        湿法冶炼系统        ￥0.00        1       
80        0201        酸浸氰化系列        ￥0.00        2       
81        0201001        土建        ￥17,000,000.00        3       
87        0201002        酸浸设备        ￥4,256,066.00        3       
88        0201003        氰化提金设备        ￥4,568,599.00        3       
89        0201004        锌粉置换设备        ￥706,381.00        3       
90        0201005        金精炼设备        ￥1,429,680.00        3       

标红色的记录如何自动计算~~~
在此先谢谢各位了~~       

todaynew

qjw9004 发表于 2011-10-29 11:14
你好！~~今天发现有一个致命的错误。如二级没有下一级就出现错误，能否帮帮一下呢？谢谢！
如：03不能将 ...

呵呵，不要尾部的len([flbh])=7这个条件就可以了。不过需要在输入时确定一个规则，凡是有下一级数据的，本级都保持为0或者null。如果不按照这个规则的话，数据都统计重复了。
SELECT ht_flxz.*, IIf(([ysje] is null) or ([ysje]=0),DSum("ysje","ht_flxz","flbh like '" & [flbh] & "*'"),[ysje]) AS Sumysje
FROM ht_flxz
ORDER BY ht_flxz.flbh;

qjw9004

todaynew 发表于 2011-10-28 14:46
不必客气，举手之劳而已。

你好！~~今天发现有一个致命的错误。如二级没有下一级就出现错误，能否帮帮一下呢？谢谢！
如：03不能将0301，0302，0303，0304加计汇！
错误截图

todaynew

qjw9004 发表于 2011-10-28 13:31
有你的帮助非常荣幸！~~再次表示感谢！

不必客气，举手之劳而已。

qjw9004

todaynew 发表于 2011-10-28 12:54
SELECT ht_flxz.*, IIf(([ysje] is null) or ([ysje]=0),DSum("ysje","ht_flxz","flbh like '" & [flbh] &  ...

有你的帮助非常荣幸！~~再次表示感谢！

qjw9004

非常感谢！

todaynew

SELECT ht_flxz.*, IIf(([ysje] is null) or ([ysje]=0),DSum("ysje","ht_flxz","flbh like '" & [flbh] & "*' and len(flbh)=7"),[ysje]) AS Sumysje
FROM ht_flxz
ORDER BY ht_flxz.flbh;

qjw9004

todaynew 发表于 2011-10-27 19:22
SELECT ht_flxz.*, IIf(nz([ysje],0)0,[ysje],DSum("ysje","ht_flxz","flbh like '" & [flbh] & "*' an ...

你好~~~
我查了很多资料才有点明白，ASP不支持NZ这个函数我想能否用isnull来代替呢？

我用isnull来替代，代码如下
SELECT ht_flxz.*, IIf(isnull([ysje]),[ysje],DSum("ysje","ht_flxz","flbh like '" & [flbh] & "*' and len(flbh)=7")) AS Sumysje
FROM ht_flxz
ORDER BY ht_flxz.flbh;

但是存在一点问题
如是二级没有下一级的话就计算不出来，结果如图~~


切望再次得到你的帮助！~~~

todaynew

qjw9004 发表于 2011-10-27 21:28
谢谢你！~~~
但有个问题让我纳闷了！
我用ASP网页代码读取表时，提示这样的错误~

网页我没玩过，呵呵。

qjw9004

todaynew 发表于 2011-10-27 19:22
SELECT ht_flxz.*, IIf(nz([ysje],0)0,[ysje],DSum("ysje","ht_flxz","flbh like '" & [flbh] & "*' an ...

谢谢你！~~~
但有个问题让我纳闷了！
我用ASP网页代码读取表时，提示这样的错误~
Microsoft OLE DB Provider for ODBC Drivers '80040e14'
[Microsoft][ODBC Microsoft Access Driver] 表达式中 'nz' 函数未定义。
\htxt\xxx.asp, line 8

ASP网页代码为
<%
   dim conn   
   dim connstr
   connstr="DBQ="+server.mappath("../data.mdb")+";DefaultDir=;DRIVER={Driver do Microsoft Access (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr
  set rs=server.createobject("adodb.recordset")
  rs.open "select * from ht_flxz_aa",conn,1,3
  Do Until rs.EOF
     Response.Write rs("flxz")&"<br/>"
     rs.MoveNext
  Loop
  response.write rs
  rs.close
  conn.close
  set rs=nothing
  set con=nothing
%>
是什么原因呢？