以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  变量  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=161634)

--  作者:ycs5801
--  发布时间:2021/3/25 2:10:00
--  变量
Select Case e.DataCol.Name
    Case "fw","fwsupplied"  \'\'fwconsup
        Dim dr As DataRow
        dr=DataTables("操作表").Find("[sureyidtimes] = \'" & e.DataRow("sureyidtimes") & "\'","[次数] = \'" & e.DataRow("次数")-1 & 

"\'")
        If dr IsNot Nothing Then
            If dr.Isnull("fw")  And e.DataRow.Isnull("fwsupplied") And e.DataRow.Isnull("fw") Then
                 e.DataRow("fwconsup")=Nothing
            Else
                e.DataRow("fwconsup")=dr("fw")+e.DataRow("fwsupplied") -e.DataRow("fw")
            End If
        End If
End Select

次数-1哪个地方报错了,麻烦老师帮忙看看,改正一下。

--  作者:有点蓝
--  发布时间:2021/3/25 8:37:00
--  
dr=DataTables("操作表").Find("[sureyidtimes] = \'" & e.DataRow("sureyidtimes") & "\' and [次数] = " & e.DataRow("次数")-1)

--  作者:ycs5801
--  发布时间:2021/3/25 9:14:00
--  
老师早,现在不报错了,但是改动数据之后“fwconsup”不变动。
--  作者:有点蓝
--  发布时间:2021/3/25 9:18:00
--  
Case "fw","fwsupplied"  \'\'fwconsup
改为
Case "sureyidtimes","次数"

--  作者:ycs5801
--  发布时间:2021/3/25 9:27:00
--  
不行,我这个次数基本是不会变的,另一个是列名,也不会变
--  作者:有点蓝
--  发布时间:2021/3/25 9:46:00
--  
没看懂,请上传实例说明
--  作者:ycs5801
--  发布时间:2021/3/25 10:03:00
--  
实例怎么上传,打包压缩上传吗?我那个意思是如果当前行有数据变动,就找到当前行的上一次的fw数据,但是现在这个找不到,就是那个dr,我测试了,dr找不到数据。
--  作者:ycs5801
--  发布时间:2021/3/25 10:04:00
--  
找到原因了,已解决,谢谢老师。
[此贴子已经被作者于2021/3/25 10:06:57编辑过]