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
Copyright © 2011-2022 走看看