Foxtable(狐表)用户栏目专家坐堂 → vars变量问题


  共有2513人关注过本帖树形打印复制链接

主题:vars变量问题

帅哥哟,离线,有人找我吗?
nxqtxwz
  11楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2018/5/13 18:30:00 [只看该作者]

以下是引用有点甜在2018/5/13 17:43:00的发言:

1、Vars("aaaaa") = e.form.controls("ComboBox1").Text & Date.Today

 

2、

 

DataTables("打印审批表_Table1").ReplaceFor("采购表名称",e.form.controls("label4").text,Tables("打印审批表_Table1").Filter)
DataTables("打印审批表_Table1").ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter)

老师您好,其它问题都已解决,十分感谢您的帮助。但:

DataTables("打印审批表_Table1").ReplaceFor("采购表名称",e.form.controls("label4").text,Tables("打印审批表_Table1").Filter)
DataTables("打印审批表_Table1").ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter)

仍然是将筛选出的比如“学校集中打印”全部记录的“采购申报表打印”列都写成了TRUE。我的本意是将绑定表中“采购申报表打印”列选中的记录(也就是已打印的)写入主表。


 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  12楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2018/5/13 18:33:00 [只看该作者]

以下是引用有点甜在2018/5/13 17:43:00的发言:

1、Vars("aaaaa") = e.form.controls("ComboBox1").Text & Date.Today

 

2、

 

DataTables("打印审批表_Table1").ReplaceFor("采购表名称",e.form.controls("label4").text,Tables("打印审批表_Table1").Filter)
DataTables("打印审批表_Table1").ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter)

老师您好,其它问题都已解决,十分感谢。

每2个问题依然不行。这两行代码是想把绑定表打印审批表_Table1中“采购申报表打印”列已选定的记录写入主表物品申报中,但实际情况是把绑定表中没有选中要打印的(绑定表中采购申报表打印列没有勾选)记录也写入了。请问代码怎么改呢?

Tables("物品申报").DataTable.ReplaceFor("采购表名称",e.form.controls("TextBox1").text,Tables("打印审批表_Table1").Filter)

Tables("物品申报").DataTable.ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter)


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/13 18:47:00 [只看该作者]

回复楼上,你代码是不是应该写在打印之前?而不是写在打印之后。

 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  14楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2018/5/13 19:00:00 [只看该作者]

以下是引用有点甜在2018/5/13 18:47:00的发言:
回复楼上,你代码是不是应该写在打印之前?而不是写在打印之后。

我是写在打印代码的最后的,这样也不行啊,请老师再给想想办法。谢谢。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/13 19:25:00 [只看该作者]

以下是引用nxqtxwz在2018/5/13 19:00:00的发言:

我是写在打印代码的最后的,这样也不行啊,请老师再给想想办法。谢谢。

 

叫你写在打印代码的前面。


 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  16楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2018/5/14 0:07:00 [只看该作者]

以下是引用有点甜在2018/5/13 18:47:00的发言:
回复楼上,你代码是不是应该写在打印之前?而不是写在打印之后。

请问老师,写在打印代码之前与之后有什么不同吗?主要问题是它把不该写入的记录也写入 了。比如“学校集中采购”可能有10条记录,我只选了其中的2条记录打印,在主表的“打印审批表”列只将这2条记录写为TRUE就行了,但现在却将10条记录的“打印审批表”列都写成了TRUE。写前与写后可能解决不了这个问题。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/14 8:52:00 [只看该作者]

1、你为什么要执行下面的代码?下面代码的意思是,把你当前表所有行的值修改;

 

DataTables("打印审批表_Table1").ReplaceFor("采购表名称",e.form.controls("label4").text,Tables("打印审批表_Table1").Filter)
DataTables("打印审批表_Table1").ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter)

 

2、你只是把选中的行打印,你完全不要写上面两句代码,你只需要把列【采购申报表打印】勾选一下即可。


 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  18楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2018/5/14 9:17:00 [只看该作者]

以下是引用有点甜在2018/5/14 8:52:00的发言:

1、你为什么要执行下面的代码?下面代码的意思是,把你当前表所有行的值修改;

 

DataTables("打印审批表_Table1").ReplaceFor("采购表名称",e.form.controls("label4").text,Tables("打印审批表_Table1").Filter)
DataTables("打印审批表_Table1").ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter)

 

2、你只是把选中的行打印,你完全不要写上面两句代码,你只需要把列【采购申报表打印】勾选一下即可。

要先按采购方式筛选出来,然后再根据采购的地方勾选打印采购申报表,因为我们的使用者水平实在是有限,所以是用窗口来控制的,在窗口绑定表中勾选后不写入主表,下次就又筛选上了。

现在是把窗口中的记录全写成了已打印了,就没有办法只写选定的记录吗?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/14 9:23:00 [只看该作者]

你是说你想把勾选/修改的值保存起来这个意思?执行代码 DataTables("打印审批表_Table1").Save 即可

 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  20楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2018/5/14 14:32:00 [只看该作者]

老师,改成下面的形式能行吗?

 

Tables("物品申报").DataTable.ReplaceFor("采购表名称",e.form.controls("TextBox1").text,Tables("打印审批表_Table1").Filter="[采购申报表打印]='True'")
Tables("物品申报").DataTable.ReplaceFor("采购申报表打印",True,Tables("打印审批表_Table1").Filter="[采购申报表打印]='True'")

 


 回到顶部
总数 21 上一页 1 2 3 下一页