Foxtable(狐表)用户栏目专家坐堂 → [求助]能否设置全局自定义事件?


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

主题:[求助]能否设置全局自定义事件?

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
[求助]能否设置全局自定义事件?  发帖心情 Post By:2014/1/18 11:46:00 [显示全部帖子]

能否设置全局自定义事件?如果能又该怎么设置?例如:
  现有表"权限清单" ,里面有列“用户名”,“数据表名”,“数据列名”,“查询权”,“修改权”(其中“查询权”与“修改权”列为逻辑列)
 想用以上表做个权限读取的全局自定义事件,当引用到此事件时能设置参数“用户名”,“数据表名”,“数据列名”,权限列名,是否可用!
请问能实现吗?

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
  发帖心情 Post By:2014/1/18 11:54:00 [显示全部帖子]

该如何写?写在哪里呢?

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
  发帖心情 Post By:2014/1/18 15:22:00 [显示全部帖子]

那设置参数在那里设置?怎么传参数?我的方法是要返回一个Boolean值,例如下面的代码:
Friend Function GetAuthority(ByVal ModelA As String, ByVal FunctionA As String, ByVal TypeA As Erp_Authority) As Boolean 

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
  发帖心情 Post By:2014/1/18 15:37:00 [显示全部帖子]

我可以打你电话直接沟通吗?要不你打我电话18996073379?

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
  发帖心情 Post By:2014/1/18 16:08:00 [显示全部帖子]

Public  Function GetAuthority(ByVal 表名 As String, ByVal 字段名 As String, ByVal 权限类 As String) As Boolean 
Dim sql As new SQLCommand
sql.C
sql.CommandText= "select [" & 权限类 & "],[_Identify] from {用户授权} where [用户名]='" & User.Name & "' and [表名窗口名]='" & 表名 & "' and [字段按键名]='" & 字段名 & "'"
Dim rebool As String =sql.ExecuteScalar & ""
Return iif(rebool  = "",False,rebool)
End Function
‘这段代码写在全局变量中后,为什么在其他地方不能引用此过程?

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
  发帖心情 Post By:2014/1/18 16:15:00 [显示全部帖子]

大哥,里面的代码我自己会调试的,你只告诉我为什么不能在其他地方引用此过程就好了,谢谢!

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


加好友 发短信
等级:幼狐 帖子:152 积分:1182 威望:0 精华:0 注册:2013/10/23 10:34:00
  发帖心情 Post By:2014/1/18 16:21:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限管理.foxdb


 回到顶部