以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]条件显示行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74633)

--  作者:fred
--  发布时间:2015/9/15 20:41:00
--  [求助]条件显示行
有一个表A中有一个字段“状态”。“状态”值为自定义为“草拟”和“已公示”。
目的:不是销售部的用户只能看到“已公示”状态的行。
代码在哪写,怎么写?下面对吗?(刚学,麻烦老师耐心一点。谢谢)

表的AfterLoad

Dim dc as Tables("表A").Current("状态") = “已公示”
If user.group="销售部" Then
dc.Visible= true
else
dc.Visible= False
End if
 

--  作者:大红袍
--  发布时间:2015/9/15 21:39:00
--  
If user.group="销售部" Then
    DataTables("表A").LoadFilter = ""
Else
    DataTables("表A").LoadFilter = "状态 = \'已公示\'"
End If
DataTables("表A").Load

--  作者:fred
--  发布时间:2015/9/16 10:59:00
--  
谢谢。但好像没什么变化。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:状态与用户.rar


--  作者:大红袍
--  发布时间:2015/9/16 11:07:00
--  

beforeLoad的事件去掉啊。

 

去窗口的AfterLoad事件写

 

If user.group="销售部" Then
    DataTables("表A").LoadFilter = ""
Else
    DataTables("表A").LoadFilter = "状态 = \'已公示\'"
End If
DataTables("表A").Load


--  作者:fred
--  发布时间:2015/9/16 11:13:00
--  
哦,看错了。是窗口哈

[此贴子已经被作者于2015/9/16 11:14:35编辑过]