以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]log  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75952)
--  作者：huhu
--  发布时间：2015/10/18 17:09:00
--  [求助]log
想记录一下订单log，可是订单log一直为空，请帮我看看，红色的代码有问题？
If e.DataCol.Name = "绑锁解绑" Then
    Select Case e.DataRow("绑锁解绑")
        Case "绑定"
            If e.DataRow.IsNull("订单编号") = False And e.DataRow.IsNull("临时版本编号") = False And e.DataRow.IsNull("产品化编号") = False Then
                e.DataRow("订单log") = "订单编号:" & e.DataRow("订单编号") & "+" & "临时版本编号:" & e.DataRow("临时版本编号") &  "+" & "产品化编号:" & e.DataRow("产品化编号") & "  " & User.Name & " " & Date.Now & "  " & "已绑定" & vbcrlf & e.DataRow("订单log")
            End If
            If e.DataRow("订单编号") <> "" And e.DataRow("临时版本编号") <> "" And e.DataRow("产品化编号") = "" Then
                e.DataRow("订单log") = "订单编号:" & e.DataRow("订单编号") & "+" & "临时版本编号:" & e.DataRow("临时版本编号")  & User.Name & " " & Date.Now & "  " & "已绑定" & vbcrlf & e.DataRow("订单log")
            End If
        Case "锁定"
            e.DataRow("订单log") = "临时版本编号:" & e.DataRow("临时版本编号") & "和" & "订单编号:" & e.DataRow("订单编号") & "  " & User.Name & " " & Date.Now & "  " & "已锁定" & vbcrlf & e.DataRow("订单log")
        Case "解锁"
            e.DataRow("订单log") = "临时版本编号:" & e.DataRow("临时版本编号") & "和" & "订单编号:" & e.DataRow("订单编号") & "  " & User.Name & " " & Date.Now & "  " & "已解锁" & vbcrlf & e.DataRow("订单log")
    End Select
End If
--  作者：大红袍
--  发布时间：2015/10/18 17:13:00
--  
加入msgbox弹出其值看一下。看是不是你的行高度不够没看到啊
--  作者：huhu
--  发布时间：2015/10/18 17:34:00
--  
哦。这个问题解决了。新的问题是
我如果再次绑定。也就说绑锁解绑的值也是绑定。
那就是绑锁解绑这一列的值并未发生变化，那么订单log就不会再次生成。
如果我仍然想记录怎么能做到？
--  作者：大红袍
--  发布时间：2015/10/18 17:36:00
--  

原本是绑定，现在也是绑定？

 

那你直接在按钮里赋值，不需要触发datacolchanged事件。