| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1206 人关注过本帖
标题:汇总结果取不到值,请指教,问题应该在末端代码中,但是我看不出来
取消只看楼主 加入收藏
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
结帖率:55.56%
收藏
 问题点数:0 回复次数:11 
汇总结果取不到值,请指教,问题应该在末端代码中,但是我看不出来
代码运行结果目标:写入数据库N条数据后汇总一次,结束
汇总结果取不到值,请指教,问题应该在末端代码中,但是我看不出来


<%
if request("hid1")="ok" then
nowselldate=request("selldate")
nowenddate=request("enddate")
nowbeizhu=request("beizhu")
nowprice=request("price")
nowbzr=request("bzr")
nowtype=request("type")
nowid_danwei=request("id_danwei")
nowid_produit=request("id_produit")
nowid_huiyuan=request("id_huiyuan")
nowid_login=request("id_login")
set rs_login=conn.execute("select * from login where id="&nowid_login)
nowid_ku=request("id_ku")
set rs_ku=conn.execute("select * from ku where id="&nowid_ku)
nowid_gys=request("id_gys")
nowgys=request("gys")
nowjxf=request("jxf")
nowybf=request("ybf")
nowgrxs=request("grxs")
nowfcf=request("fcf")
nowaqf=request("aqf")
nowgj=request("gj")
nowbianhao=replace(replace(replace(replace(replace(replace(FormatDateTime(now(),0),":","")," ",""),"-",""),"/",""),"上午",""),"下午","")
'totalshulian=0
for x=1 to maxproduit
nowhuohao=request("huohao"&x)
nowtitle=request("title"&x)
nowshulian=request("shulian"&x)
nowid_danwei=request("id_danwei"&x)
nowprice2=request("price2"&x)
nowprice1=request("price1"&x)
nowbigclass=request("bigclass"&x)
if nowprice2="" then
  nowprice2=0
end if
if nowprice1="" then
  nowprice1=0
end if
if nowshulian="" then
  nowshulian=0
end if
if nowhuohao<>"选择定额" and nowshulian<>"" then
set rs_dek=conn.execute("select * from dek where debh='"&nowhuohao&"'")
set rs=server.createobject("ADODB.RecordSet")
sql="select * from b3j where 1=2"
rs.open sql,conn,1,3
rs.addnew
rs("huohao")=nowhuohao
rs("title")=nowtitle
rs("shulian") =nowshulian
rs("id_danwei")=nowid_danwei
rs("price1")=nowprice1
rs("price2")=nowprice2
rs("bigclass")=nowbigclass
rs("id_gys")=nowid_gys
rs("id_produit")=nowid_produit
rs("id_huiyuan")=nowid_huiyuan
rs("price")=nowprice
rs("id_ku")=nowid_ku
rs("bzr")=nowbzr
rs("gys")=nowgys
rs("type")=nowtype
rs("selldate")=nowselldate
rs("enddate")=nowenddate
rs("id_login")=nowid_login
rs("login")=rs_login("username")
rs("bianhao")=nowbianhao
rs("beizhu")=nowbeizhu
rs("ybf")=nowybf
rs("jxf")=nowjxf
rs("grxs")=nowgrxs
rs("fcf")=nowfcf
rs("aqf")=nowaqf
rs("gj")=nowgj
rs("jggr")= nowprice1*nowshulian
rs("pggr")= nowprice2*nowshulian
rs.update
end if
next

set count_b3j = server.createobject("ADODB.RecordSet")   
count_b3j.open sql,conn,1,3
nowjggr=0
nowpggr=0
do while count_b3j.eof=false
  sql3="select sum(jggr),sum(pggr) from b3j where bianhao='"&nowbianhao&"' "
        set rs_sum=conn.execute(sql3)  
  nowjggr=nowjggr+rs_sum(0)
  nowpggr=nowpggr+rs_sum(1)
  count_b3j.movenext
loop
set rs2=server.createobject("ADODB.RecordSet")
sql="select * from b3j where bianhao='"&nowbianhao&"'"
rs2.open sql,conn,1,3
do while rs2.eof=false
rs2.addnew
rs2("bianhao")=nowbianhao
rs2("title")="---[工日小计]---"
rs2("jggr")=nowjggr    汇总结果取不到值
rs2("pggr")=nowpggr    汇总结果取不到值

rs2.movenext
loop

%>
搜索更多相关主题的帖子: request 数据库 price 
2013-09-24 22:11
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
快来帮我看看啊
2013-09-25 20:20
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
rs_sum(0)
rs_sum(1)好像都没有值,数据库写入数据是0,求高手来看下我代码错在哪了
2013-09-25 21:09
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
快来帮我看看啊
2013-09-26 19:40
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
怎么如此冷清
2013-09-27 13:31
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
版主来帮我看看啊
2013-09-28 16:10
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
高手来来去去,怎么不见回复,帮忙看下,我代码哪里有问题@谢谢
2013-09-30 08:18
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
为何我的问题无人回答
2013-10-06 00:35
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
主要是这部分代码,现在关键的问题是nowjggr、nowpggr取不到值,帮我看下,我对字段求和不甚了解
set count_b3j = server.createobject("ADODB.RecordSet")   
count_b3j.open sql,conn,1,3
nowjggr=0
nowpggr=0
do while count_b3j.eof=false
  sql3="select sum(jggr),sum(pggr) from b3j where bianhao='"&nowbianhao&"' "
        set rs_sum=conn.execute(sql3)  
  nowjggr=nowjggr+rs_sum(0)
  nowpggr=nowpggr+rs_sum(1)
  count_b3j.movenext
loop
set rs2=server.createobject("ADODB.RecordSet")
sql="select * from b3j where bianhao='"&nowbianhao&"'"
rs2.open sql,conn,1,3
do while rs2.eof=false
rs2.addnew
rs2("bianhao")=nowbianhao
rs2("title")="---[工日小计]---"
rs2("jggr")=nowjggr    汇总结果取不到值
rs2("pggr")=nowpggr    汇总结果取不到值

rs2.movenext
loop

2013-10-07 08:54
eournet
Rank: 2
等 级:论坛游民
帖 子:103
专家分:26
注 册:2010-5-22
收藏
得分:0 
没有任何结果显示,还是请版主帮我看看这个代码书写是否正确
2013-10-07 20:18
快速回复:汇总结果取不到值,请指教,问题应该在末端代码中,但是我看不出来
数据加载中...
 
   



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

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