[求助]我更新新版后，换了电脑，进程序就出了问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

在项目事件afteropenproject中是

。。。。。。。。。。。。。。。。

Forms("资料管理主表_f").open
图片点击可在新窗口打开查看

此主题相关图片如下：i${e)dkx`u`s9ew7hg)hxib.png

'生成临时表

Dim arr As List(Of String) = DataTables("分项工程表").GetValues("分项工程名称")

Dim fxgc As String = ""

If arr.Count > 0

fxgc = cstr( arr.ToArray(0) )

Dim temp As String = "[分项工程名称] like '" + fxgc + "' "

Dim t As Table = Tables("施工记录表")

t.Filter = temp

Functions.Execute("根据施工记录表生成模版数据",fxgc ,t)

End If

。。。。。。。。。。。。。。。。

另外我设置的加密狗也不执行了

主题：[求助]我更新新版后，换了电脑，进程序就出了问题