[求助]独占式编辑 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]独占式编辑

共有1614人关注过本帖树形打印复制链接主题：[求助]独占式编辑

81538475

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

等级：六尾狐帖子：1287 积分：10368 威望：0 精华：1 注册：2018/1/20 12:40:00

[求助]独占式编辑 发帖心情

Post By：2018/8/10 9:56:00 [只看该作者]

之前的独占式编辑，在项目afteropenproject 里面加入如下代码，但是由于设置了初始不加载任何数据，所以导致编辑者一栏无法被清楚。

有没有可能打开项目时直接修改数据库的数据呢？

Dim ts As String() = {"XMZB","XMFP","人员信息表","简历登记表","综合奖惩记录表"}

For Each T As String In TS

DataTables(t).ReplaceFor("编辑者",Nothing,"编辑者 = '" & _username & "'")

DataTables(t).Save()

'Tables(t).Cols.Remove("编辑者") '移除编辑者列,避免用户直接修改此列

有点甜

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

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/8/10 10:09:00 [只看该作者]

你可以直接写

DataTables(t).sqlReplaceFor("编辑者",Nothing,"编辑者 = '" & _username & "'")

主题：[求助]独占式编辑