| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1168 人关注过本帖
标题:怎么求每一列的总和
只看楼主 加入收藏
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
结帖率:68.57%
收藏
已结贴  问题点数:10 回复次数:9 
怎么求每一列的总和
各位老师:
    有如下一个问题:
    第24行可以得到最后的一个总和(我只需这个总和),但我把这总和放到循环内的第18行就不行了,第18行得到的总和sum是一个相加过程的总和(我只需最后一个总和);请问各位老师,在循环内,怎么才能只获取最后的那个总和?(24行是一个固定的总和;而18行得到的是一个变化的总和)
=======================================================
<%
Orderby=" where  SD_QIH>='"&StartQih&"' AND SD_QIH<='"&EndQih&"'"
Orderby=Orderby&"group by SD_LYE order by SD_LYE asc"
set Waitrs=WS_S.HX_SetRSD("SD_LYE,count(SD_LYE) as LYE","SD_HAOMAB",Orderby)
%>

    <%
    sum=0
    do while not Waitrs.EOF
    %>

    <tr align=center class='titletdbg'>
      <% if a+b >1.5 then %>
      <% sum=sum+a+b+1.2 %>
      <% else %>
      <% sum=sum+a+b%><% end if %>
    </tr>

    <tr>
      <td><%=(a+b)/sum%>                             '.........................第18行
    </tr>

    <%
        Waitrs.movenext
            loop
        end if
    %>

      <td><%=sum%></td>                              '..........................第24行

    <%
        Waitrs.close:set Waitrs=nothing
    %>
==========================================================


[ 本帖最后由 anjincheng 于 2009-11-17 12:35 编辑 ]
搜索更多相关主题的帖子: where 
2009-11-17 12:31
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:10 
能否截图说明?
2009-11-17 17:37
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
你好老师:
以下是截图情况,感谢!
图片附件: 游客没有浏览图片的权限,请 登录注册

图片附件: 游客没有浏览图片的权限,请 登录注册


代码如下:

<%Case "YiLou"%>
<%
Orderby=" where  SD_QIH>='"&StartQih&"' AND SD_QIH<='"&EndQih&"'"
Orderby=Orderby&"group by SD_LYE order by SD_LYE asc"
set Waitrs=WS_S.HX_SetRSD("SD_LYE,count(SD_LYE) as LYE","SD_HAOMAB",Orderby)
%>
<table cellpadding='2' cellspacing='1' border='0' class='border' align=center>
   <form action="sdzonghe.asp" method="get" name="search"><tr class='Navigationtdbg'>
      <td>日期:
        <%
        set ERs=WS_S.HX_SetRSD("SD_QIH","SD_HAOMAB"," order by SD_QIH desc")
        %>第
        <input name="StartQih" type="text" value="2002001" size="7" maxlength="7"  autocomplete=off>&nbsp;至&nbsp;
        <input name="EndQih" type="text" value="<%=ERs("SD_QIH")%>" size="7" maxlength="7"  autocomplete=off>&nbsp;
        <%ERs.close:set ERs=nothing%>&nbsp;
      <input type="submit" name="Submit2" value=" 查 看 " class="button">
      <input name="Action" type="hidden" value="YiLou">
      </td>
    </tr></form>
</table><br>
<table cellpadding='2' cellspacing='1' border='0' class='border' align=center>
    <tr class='title'>
      <td colspan="4">综合</td>
    </tr>
   
    <tr class='Navigationa'>
      <td width="25%">日期</td>
      <td width="25%">方案</td>
      <td width="25%">类别</td>
      <td width="25%">概率</td>
    </tr>
    <%
if Waitrs.recordcount<=0 then
%>
    <tr>
      <td colspan=4 class="titletdbg" height=25 align=center>暂无符合条件的信息,请输入查询条件!</td>
    </tr>
    <%
else
    sumlye1=0
    do while not Waitrs.EOF
    %>
    <tr align=center class='titletdbg'>
      <td><%=EndQih+1%></td>
      <td>1</td>
      <td><%=Waitrs("SD_LYE")%></td>
      
      <%
      Orderby1=" where SD_QIH>='"&StartQih&"' AND SD_QIH<='"&EndQih&"'"
      set Waitrs1=WS_S.HX_SetRSD("SD_LYE","SD_HAOMAB",Orderby1)
      i = 0
      j = 0
      num = 0
      daoer = 0
      isgao = true
      do while not Waitrs1.eof
      j = j + 1
      if Waitrs1("SD_LYE")=Waitrs("SD_LYE") then
        isgao = false
        daoer=i
      end if
      if isgao then
        i = i + 1
      else
        if i > num then
            num = i
        end if
        i = 0
        isgao = true
      end if

      a=CStr(i)
      b=CStr(j)
      c=Waitrs("LYE")
 
      Waitrs1.movenext
      loop
      %>
      
      <%if (a/((b-c)/(c+1)))>1.57079 then%>
      <%sumlye1=sumlye1+(a/(3.14*((b-c)/(c+1))))+1.25248%><%else%>
      <%sumlye1=sumlye1+a/((b-c)/(c+1))%><%end if%>


      <%if (a/((b-c)/(c+1)))>1.57079 then%>
      <td><%=formatnumber((((a/(3.14*((b-c)/(c+1))))+1.25248)  /  sumlye1  ),5,-1)%></td><%else%>
      <td><%=formatnumber(((a/((b-c)/(c+1)))  /   sumlye1 ),5,-1)%></td><%end if%>
    </tr>
    <%     
      Waitrs1.close:set Waitrs1=nothing
    %>
    <%
        Waitrs.movenext
            loop
            end if
        Waitrs.close:set Waitrs=nothing
    %>
</table>

[ 本帖最后由 anjincheng 于 2009-11-17 18:50 编辑 ]

我是农家的孩子,我有农家孩子的本色!
2009-11-17 18:48
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
就是测试那列的所有数据除以,最大的数?
你的测试列的数据是怎么得到的?
2009-11-17 19:39
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
是“数量”那列的数分别除以最大的和(也就是说:数量这列的数分别除以数量这列所有数的总和)
测试那列是我为了测试总和(sumlye1)到底是多少临时增加的,是要删除的列!

我是农家的孩子,我有农家孩子的本色!
2009-11-17 20:50
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
那估计还的使用冒泡排序,
先把测试那列数据算出来,存入数组得出最大数,然后再用最大数相除。
2009-11-18 10:53
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
感谢老师!
能否给点具体的代码?感谢!我尝试了很多,越弄越晕了!

我是农家的孩子,我有农家孩子的本色!
2009-11-18 17:15
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
还是不行,老师能给点代码吗?

我是农家的孩子,我有农家孩子的本色!
2009-11-19 16:21
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
你把源代码打包发上来我看,是关于你这个网页的不是全部源代码。

[ 本帖最后由 yms123 于 2009-11-22 18:05 编辑 ]
2009-11-22 18:04
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
test.rar (1.8 KB)


代码中123行的“sumlye1”如果放到127行,就可以得到我要的那个数,但放在123行就不行了!
麻烦老师看看怎么处理?感谢诶~~

我是农家的孩子,我有农家孩子的本色!
2009-11-22 22:15
快速回复:怎么求每一列的总和
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022208 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved