我有一张车辆加油记录表,原来都是直接加载的,因为数据量大了,我改成初始不加载。
每次登记时,要记录车辆里程,原来数据都加载时,上期里程就是读取上期的记录,我用如下的代码:
If e.DataCol.name="车号" Then
If e.NewValue IsNot Nothing Then
Dim i As Integer=0
i=e.DataTable.Compute("Max(_identify)","车号='" & e.NewValue & "' AND _identify<>'" & E.DataRow("_identify") & "'")
If i<>0 Then
Dim dr2 As DataRow=e.DataTable.find("_identify='" & i & "'")
If dr2 IsNot Nothing Then
e.DataRow("上期里程读数")=dr2("本期里程读数")
End If
End If
End If
End If
现在改成不加载数据,那么上期里程要从sql表中提取了,请教这个代码怎么改?谢谢!