求助关于授权打开的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求助关于授权打开的问题

共有2636人关注过本帖树形打印复制链接主题：求助关于授权打开的问题

188802386

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：629 积分：4915 威望：0 精华：0 注册：2014/2/25 15:50:00

求助关于授权打开的问题 发帖心情

Post By：2014/5/17 19:43:00 [只看该作者]

If Functions.Execute("shouquan","业务平台","e.Sender.Current.ImageKey") Then

If Forms.Contains(e.Sender.Current.ImageKey) Then

Forms(e.Sender.Current.ImageKey).Open

MainTable = Tables(Forms(e.Sender.Current.ImageKey).TableName)

End If

Else

MessageBox.Show("你无查看权限")

End If

如上代码红色区域改如何写才能达成比如我点击“有效房源” 红色区域的意思就是“有效房源” 如果点击“无效客户” 红色区域就表示无效“无效客户”

逛逛

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：1693 积分：12117 威望：0 精华：7 注册：2013/7/11 10:52:00

Post By：2014/5/17 19:57:00 [只看该作者]

不明白你的具体函数，但是，你想传递动态参数的话，应该把红色部分的双引号去掉

If Functions.Execute("shouquan","业务平台",e.Sender.Current.ImageKey) Then

188802386

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：629 积分：4915 威望：0 精华：0 注册：2014/2/25 15:50:00

Post By：2014/5/17 20:11:00 [只看该作者]

谢谢果然是双引号的问题去掉就可以用了

主题：求助关于授权打开的问题