注册 登录
编程论坛 ASP技术论坛

请高手师傅们修改ckxp书店程序金额总计代码!急!

yythac 发布于 2008-08-16 11:04, 656 次点击
各位高手师傅们:你们好,叩请帮小弟修改一下ckxp书店程序金额总计代码-------我想将原来的统计方式(最后的总金额统计)修改为除以4.3再乘以100得到总金额元,不足100元的以100元计,谢谢!代码如下:


<td colspan="5" bgcolor="#DEEFEF"><div align="right">
              <%response.write "<font color=#FF6600>您选择的送货方式是:"
          '///判断送货方式读取加收金额
          dim gongji,gongjijiner,fujiafei '共计金额
          set rs3=server.CreateObject("adodb.recordset")
          rs3.open "select * from shop_songhuo where songid="&int(rs("songhuofangshi")),conn,1,1
          if rs3.eof and rs3.bof then
          response.write "方式已经被删除"
          response.write "&nbsp;+"&formatnumber(0,2)&"元&nbsp;&nbsp;&nbsp;共计:"
          response.write formatnumber(iiii,2)&"元"
          else
          response.Write trim(rs3("subject"))
          response.write "&nbsp;+"&formatnumber(rs3("jsmoney"),2)&"元&nbsp;&nbsp;&nbsp;共计:"
          gongji=formatnumber(iiii+rs3("jsmoney"),2)&"元"
          response.Write gongji
          gongjijiner=round(ccur(iiii+rs3("jsmoney")),2)     '//总金额
          fujiafei=ccur(rs3("jsmoney"))      '//加收金额
          end if
          rs3.close
          set rs3=nothing%>
              &nbsp;&nbsp;&nbsp;&nbsp;</font></div></td>

[[it] 本帖最后由 yythac 于 2008-8-16 11:51 编辑 [/it]]
0 回复
1