以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]增强查阅模式,应该怎么做呢?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=46678)

--  作者:zmh4358
--  发布时间:2014/2/26 23:40:00
--  [求助]增强查阅模式,应该怎么做呢?

我想在窗口里点查阅模式,不光不能编辑,还不能破坏表结构,以及删除行等操作,不知道如何弄呢?自己弄了一下,不行请老师帮看看。

If DataTables.AllowEdit Then
    DataTables.AllowEdit = False
Syscmd.Table.Lock()

    For Each dt As DataTable In DataTables
       
        DataTables(dt.name).AllowDelete = False
        MessageBox.Show(dt.Name)
    Next
    Forms("导航栏").Close
Else
    DataTables.AllowEdit = True
Syscmd.Table.Unlock()

   
    For Each dt As DataTable In DataTables
       
        DataTables(dt.name).AllowDelete = True
MessageBox.Show(dt.Name)
    Next
    Forms("导航栏").open
End If


--  作者:Bin
--  发布时间:2014/2/27 8:23:00
--  
如果是发布后的项目,本来就不可以的哦.
--  作者:狐狸爸爸
--  发布时间:2014/2/27 8:28:00
--  

其实没有必要了,在项目属性中,将“关闭开发功能”设置为True,这样除开发者之外,谁也无法修改表结构。

 


--  作者:zmh4358
--  发布时间:2014/2/27 15:47:00
--  
以下是引用Bin在2014-2-27 8:23:00的发言:
如果是发布后的项目,本来就不可以的哦.
我是小白,能请老师说明白点吗,,我得是试用版,做了点小功能,,在窗口里想加个一键锁屏或一键解锁得功能,刚好看到有点像,所以想在这个基础上增强一下,就能达到我得目地了,可是窗口下不行,能有办法解决吗,麻烦老师了
--  作者:Bin
--  发布时间:2014/2/27 15:49:00
--  
开发版,发布后的项目. 直接就不可修改.


试用版可以参考3楼狐爸的答复.

--  作者:zmh4358
--  发布时间:2014/2/27 15:49:00
--  
以下是引用狐狸爸爸在2014-2-27 8:28:00的发言:

其实没有必要了,在项目属性中,将“关闭开发功能”设置为True,这样除开发者之外,谁也无法修改表结构。

 

那请问老师,如果录入员这种(模式下)编辑和删除 数据 会受影响吗?


--  作者:狐狸爸爸
--  发布时间:2014/2/27 16:05:00
--  
不影响
--  作者:zmh4358
--  发布时间:2014/2/27 16:17:00
--  
以下是引用狐狸爸爸在2014-2-27 16:05:00的发言:
不影响

哦,谢谢老师指点,,