自动升级 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自动升级

共有2134人关注过本帖树形打印复制链接主题：自动升级

nxqtxwz

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

加好友

发短信

等级：六尾狐帖子：1495 积分：12175 威望：0 精华：0 注册：2013/3/19 16:41:00

自动升级

Post By：2018/1/3 10:43:00 [显示全部帖子]

老师您好，请问如何实现局域网内发布的项目自动升级呢？代码怎么写呢？

nxqtxwz

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

加好友

发短信

等级：六尾狐帖子：1495 积分：12175 威望：0 精华：0 注册：2013/3/19 16:41:00

Post By：2018/1/3 10:45:00 [显示全部帖子]

If Syscmd.Project.Update(False,False) = False Then '如果没有升级
    DataTables("职工信息总表").DataCols("出生日期").RaiseDataColChanged()
    DataTables("调出职工").DataCols("出生日期").RaiseDataColChanged()
    Tables("职工信息总表").OpenView("视图一")
    DataTables("退休职工").DataCols("出生日期").RaiseDataColChanged()
    DataTables("职工信息总表").DataCols("工作时间").RaiseDataColChanged()
End If

nxqtxwz

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

加好友

发短信

等级：六尾狐帖子：1495 积分：12175 威望：0 精华：0 注册：2013/3/19 16:41:00

Post By：2018/1/3 11:18:00 [显示全部帖子]

老师，您说的这些路径我都是正确的，但在AfterOpenProject事件中代码应该怎么写呢，我上面的写法正确吗？如果这样写行不行：

Syscmd.Project.Update(False,False)

    DataTables("职工信息总表").DataCols("出生日期").RaiseDataColChanged()
    DataTables("调出职工").DataCols("出生日期").RaiseDataColChanged()
    Tables("职工信息总表").OpenView("视图一")
    DataTables("退休职工").DataCols("出生日期").RaiseDataColChanged()
    DataTables("职工信息总表").DataCols("工作时间").RaiseDataColChanged()

nxqtxwz

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

加好友

发短信

等级：六尾狐帖子：1495 积分：12175 威望：0 精华：0 注册：2013/3/19 16:41:00

Post By：2018/1/3 14:31:00 [显示全部帖子]

问题解决，谢谢老师。原来是我项目属性中的发布日期没有改变，每次编译后都是同一日期，所以没有动作。

下一主题 >> << 上一主题

主题：自动升级