以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助关于授权打开的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=51033)
--  作者：188802386
--  发布时间：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


如上代码 红色区域改如何写才能达成 比如我点击“有效房源” 红色区域的意思就是“有效房源”   如果点击“无效客户” 红色区域就表示无效“无效客户”
--  作者：逛逛
--  发布时间：2014/5/17 19:57:00
--  

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

 

If Functions.Execute("shouquan","业务平台",e.Sender.Current.ImageKey) Then
--  作者：188802386
--  发布时间：2014/5/17 20:11:00
--  
谢谢  果然是双引号的问题  去掉就可以用了