以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  图片和多文件的另存为功能能不能对部分用户屏蔽  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=94531)

--  作者:luckbetter333
--  发布时间:2016/12/26 8:34:00
--  图片和多文件的另存为功能能不能对部分用户屏蔽
如题,但不影响这些用户查看图片和文件。单位的局域网能够做到只查看图片,不能下载,不知道狐表能不能这样设置。
--  作者:有点蓝
--  发布时间:2016/12/26 8:55:00
--  
1、不下载就不能看图片,要看就必须先下载。

2、可以根据权限隐藏另存按钮:http://www.foxtable.com/webhelp/scr/2285.htm

--  作者:luckbetter333
--  发布时间:2016/12/26 9:30:00
--  
我的图片和文件存在服务器中,也必须下载么?
--  作者:luckbetter333
--  发布时间:2016/12/26 9:49:00
--  
我上传了例子,麻烦帮忙看下,如何取消另存为功能,看了您发的链接,提示错误。代码如下,放在表属性beforeopenfile
Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")
fm.
SaveAsCommand.Visible = False
[此贴子已经被作者于2016/12/26 9:56:13编辑过]

--  作者:luckbetter333
--  发布时间:2016/12/26 9:50:00
--  
我回复好像没法上传附件,另外立贴上传
--  作者:有点色
--  发布时间:2016/12/26 9:54:00
--  
 代码要写到AfterOpenProject事件。
--  作者:luckbetter333
--  发布时间:2016/12/26 10:23:00
--  
Tables("产品档案").Cols("产品图号").OpenWindow()
Dim fl1 As WinForm.PictureViewer = Tables("产品档案").Cols("产品图号").PictureViewer
fl1.SaveAsCommand.Enabled = False
fl1.SaveAsCommand.Enabled = False


Tables("产品档案").Cols("产品技术要求").OpenWindow()
Dim fl As WinForm.FileManager = Tables("产品档案").Cols("产品技术要求").FileManager
fl.SaveAsCommand.Enabled = False
fl.SaveAsCommand.Visible = False

请帮忙看下哪有问题,还是能看到能保存

--  作者:有点色
--  发布时间:2016/12/26 11:06:00
--  

 7楼代码,没问题。你必须执行一次代码,才能消失的。

 

 如果,你是直接在窗口里面用了图片、文件控件的,你要这样处理 http://www.foxtable.com/webhelp/scr/2285.htm