以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]数据录入错乱  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93665)

--  作者:js4222
--  发布时间:2016/12/3 18:44:00
--  [求助]数据录入错乱

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20161203184040.png
图片点击可在新窗口打开查看
如图,品名为引用其他表的品名
录入新的数据的时候,会出现其他行旧数据的品名跟着变化,数据源为外部表access
比如录入5N,然后旧的某一条数据品名会变化成5N,就品名变,其他都不变
这个是什么原因?想想很可怕,如果是记账的,姓名发生变化,那就对财务来说是个极大打击
表属性基本为空,其他表也没有出现类似问题,有表C跨表统计品名的总金额
[此贴子已经被作者于2016/12/3 19:29:27编辑过]

--  作者:js4222
--  发布时间:2016/12/3 19:00:00
--  
没有人碰到过这个问题嘛


--  作者:js4222
--  发布时间:2016/12/3 23:47:00
--  
大神来啊
--  作者:有点色
--  发布时间:2016/12/4 15:22:00
--  

 你引用它表数据的方法是什么?用代码,还是用关联?

 

 如果是用代码,贴出你datacolchanged事件的代码看看。


--  作者:js4222
--  发布时间:2016/12/5 12:38:00
--  回复:(有点色) 你引用它表数据的方法是什么?...
If e.DataCol.Name = "姓名" Then
    Dim Filter As String = "[姓名] = \'" & e.NewValue & "\'"
    Dim m As Integer = e.DataRow("日期").Month
    Dim y As Integer = e.DataRow("日期").Year
    Dim dt1 As New Date(y, m, 1)
    Dim dt2 As New Date(y, m + 1, 1)\'获取下个月的第一天
    Filter = filter & " and 日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
    e.DataRow("借支") = DataTables("借支表").sqlCompute("Sum(金额)",Filter)
End If
---------------引用代码
其他的没有了。本来是用compute也会,后来用了sqlcompute,还是会这样

--  作者:有点蓝
--  发布时间:2016/12/5 14:12:00
--  
上例子看看,代码看不出和你的例子有关系