在表的currentchanged事件加入如下代码 用于加载子表信息
If Forms("主窗体_客户需求投诉").Opened Then
If e.Table.Current IsNot Nothing Then
If e.Table.Current("客户编号") <> "" Then
DataTables("客户生命体征记录").LoadFilter = "客户编号 = " & e.Table.Current("客户编号")
DataTables("客户入住记录").LoadFilter = "客户编号 = " & e.Table.Current("客户编号")
Else
DataTables("客户沟通跟踪记录").LoadFilter = "[_Identify] Is null"
DataTables("客户入住记录").LoadFilter = "[_Identify] Is null"
End If
Else
DataTables("客户生命体征记录").LoadFilter = "[_Identify] Is null"
DataTables("客户入住记录").LoadFilter = "[_Identify] Is null"
End If
DataTables("客户生命体征记录").Load
DataTables("客户入住记录").Load()
End If
现在有个奇怪的问题,我在客户生命体征记录内删除某客户的一行信息,不进行保存,然后切换到别的行后,重新再选在该客户,为什么删除的信息就没有了,按理说我不保存它应该重新被加载回来的
我在数据库后台看也一直正确,包括删除完切换到其它行时,被删的记录还在,但是当再选择回这个客户的时候,直到运行DataTables("客户生命体征记录").Load前,删除的记录还在,DataTables("客户生命体征记录").Load执行后记录没有加载回来,而且数据库上该条数据页被删掉了