以文本方式查看主题

-  易表在线答疑  (http://egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://egrid2000.com/dvbbs/list.asp?boardid=2)
----  [求助]结果数据转到其他表,请帮忙。  (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=5038)

--  作者:流光
--  发布时间:2006/11/21 13:38:00
--  [求助]结果数据转到其他表,请帮忙。
在“预缴费”表里面建立了一个“打印收据”的按钮,目的是想,将“余额合计”返回到“用户信息”表中的对应记录的“预缴费余额”中去。并打印“预缴费收据”报表。打印完成进入新一条记录。

每次进本表前删除电话号码为空的记录并建立一条新的记录等待录入。RAR文件下载


--  作者:czy
--  发布时间:2006/11/21 13:53:00
--  
表预处理公式:Do(100)
表验证公式:DelFor(Grid,"电话号码","=","")
打印收据按钮公式:EvalFor("用户信息","预缴费余额","if([预缴费!RelationRow]=-1,[预缴费余额],[预缴费!余额合计])") And Report(Grid,"预缴费收据",1,Rows,0) And Do(100)
--  作者:流光
--  发布时间:2006/11/21 16:09:00
--  
加上验证公式后出错,提示“运行时错误‘381’:无效属性数组索引。

另外,打印是我只想打印当前记录。


--  作者:czy
--  发布时间:2006/11/21 16:12:00
--  
那就改成这样。
表预处理公式:DelFor(Grid,"电话号码","=","") and Do(100)

EvalFor("用户信息","预缴费余额","if([预缴费!RelationRow]=-1,[预缴费余额],[预缴费!余额合计])") And Report(Grid,"预缴费收据",row,Row,0) And Do(100)


--  作者:流光
--  发布时间:2006/11/21 19:41:00
--  
对不起, czy 版主大人,我忘记了一件事情了,还要麻烦您。

预缴费返回给“用户信息”表后,还要再“用户信息”表的那条记录中的“预缴费用户”那里打勾


--  作者:czy
--  发布时间:2006/11/21 19:55:00
--  
改成这样:

EvalFor("用户信息","预缴费余额","if([预缴费!RelationRow]=-1,[预缴费余额],[预缴费!余额合计])") And EvalFor("用户信息","预缴费用户","[预缴费!RelationRow]>-1","预缴费用户","=",0)And Report(Grid,"预缴费收据",row,Row,0) And Do(100)


--  作者:dg5588
--  发布时间:2006/11/21 21:16:00
--  
厉害!
--  作者:流光
--  发布时间:2006/11/21 21:32:00
--  
的确厉害哦!

谢谢了!