以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  代码功能异常  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=130463)
--  作者：有点甜
--  发布时间：2019/1/22 16:43:00
--  

1、你代码写在什么位置？

 

2、在代码那里，加入msgbox，看弹出的值，是否正常。是否进入执行了里面的代码。
--  作者：有点甜
--  发布时间：2019/1/22 17:34:00
--  
在代码那里，加入msgbox，看弹出的值，是否正常。是否进入执行了里面的代码
--  作者：有点甜
--  发布时间：2019/1/23 9:08:00
--  

窗口表的afterLoad事件，在执行 datatables("xxx").load 的时候才会触发的。

 

你试试直接写到窗口的afterLoad事件。
--  作者：有点甜
--  发布时间：2019/1/23 10:19:00
--  

 

你本来写在【表格的afterload】事件？窗口的afterload和表格的afterload，是不同的。

 

 
--  作者：有点蓝
--  发布时间：2019/1/23 11:23:00
--  
关闭退出项目，删除项目所在的文件夹里的bin目录，然后重启项目试试。
--  作者：有点蓝
--  发布时间：2019/1/23 14:25:00
--  
下面代码放到窗口计时事件中，开启计时器

e.Form.TimerEnabled = False
e.Form.Strips("工具栏").Items("删除").Visible = (_UserName = "管理员")
If _UserGroup  <> "卡特线" And _UserGroup  <> "缸盖线" And _UserGroup  <> "缸体线" And _UserGroup  <> "OE线" And _UserGroup  <> "6D缸体线" Then
msgbox(1)
    e.form.controls("线长审核").visible = False
msgbox(2)
End If
msgbox(3)
If _UserGroup  <> "经理" And _UserGroup  <> "采购部" Then
msgbox(3)
    e.form.controls("经理审核").visible = False
msgbox(4)
End If
If _UserGroup  <> "仓库"  Then
msgbox(5)
    e.form.controls("订单取消").visible = False
msgbox(6)
End If
--  作者：有点甜
--  发布时间：2019/1/23 15:17:00
--  
以下是引用nuoyan88在2019/1/23 13:18:00的发言：
我是发布成功的项目，刚发布都用的好好的，后面就不行了，所以原因不知道出在哪里？

 

能否做一个对应出错的例子发上来测试？
--  作者：有点甜
--  发布时间：2019/1/23 17:17:00
--  
以下是引用nuoyan88在2019/1/23 15:22:00的发言：
老师，我重新做了个例子，例子上没问题，您这样行吗？在出现这种现象能远程帮忙给我看看吗？谢谢！

 

联系客服QQ远程测试一下。