昨天晚上发现一次,刚刚又发生了一次,症状是这样的
在窗口中用代码保存表,只要一保存,数据就全部没了,没有任何报错
关掉项目,删除bin文件夹,又好了,已经连续出现两次了,不知道是什么原因,跟不知道项目发布后会不会出现类似的现象,不知道是不是系统的bug,希望老师能够告诉我,究竟出来什么问题?
今天出现问题的代码:
Select Case e.StripItem.Name
Case "提交"
With Tables("B05维修记录")
Tables("B05维修管理").current("维修提交") = 1
Tables("B05维修管理").current("维修审核") = 0
.current("提交") = True
.current("提交时间") = Date.now
msgbox(1)
.save()
End With
msgbox(2)
Tables("B05维修管理").Current.save()
DataTables("B05维修记录").save()
DataTables("B05维修资料").save()
DataTables("B05维修配件").save()
e.form.close()
End Select
执行到1的时候数据还在的,当执行到2的时间,数据就没有了