局域网客户端新增确定提示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

'---------以下是自动生成工号--------------------------

Dim i As String = DataTables("合同主表").Compute("max(序号)")

Dim idx As Integer

If i > "" Then

idx = cint(i.SubString(1,9)) +1

Else

idx =1

End If

Tables("合同主表").Current("序号") = "H" & ForMAT(idx,"000000000")

DataTables("合同主表").Save

Tables("合同主表").AllowEdit = False

e.Form.close

新增窗体确定按钮代码，，，我在数据库本机新增都正常，但是在局域网其它电脑新增时就提示附加里的窗口不知道是什么原因
图片点击可在新窗口打开查看

此主题相关图片如下：微信图片_20230731145642.png

主题：局域网客户端新增确定提示