以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动生成明细表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194524)

--  作者:shqpldczj
--  发布时间:2024/12/18 20:12:00
--  自动生成明细表

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
 请教老师我在弹窗信息输入后按确定能自动生成月租金明细
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
表如附件2那样
--  作者:有点蓝
--  发布时间:2024/12/19 9:00:00
--  
确定按钮

dim d1 as date = e.form.controls("起始日期").value
dim d2 as date = e.form.controls("结束日期").value

dim r as row
do while d1 <= d2
r = tables("表A").addnew
r("编号") = e.form.controls("编号").text
r("日期") = d1 
r("租金") = e.form.controls("租金").text
d1 = d1.adddays(1)
loop

--  作者:shqpldczj
--  发布时间:2024/12/19 17:02:00
--  非常感谢
 非常感谢图片点击可在新窗口打开查看