以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  RowColEventArgs 错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24390)

--  作者:hawkerwin
--  发布时间:2012/10/12 16:02:00
--  RowColEventArgs 错误
当表格里面只剩最后一行时,就出现错误
这个错误是什么意思?
图片点击可在新窗口打开查看此主题相关图片如下:{5676d8e0-8aa1-49ab-b485-6d6570ef3bad}.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2012-10-12 16:03:03编辑过]

--  作者:lin_hailun
--  发布时间:2012/10/12 16:15:00
--  
 问题没遇到过,把你的项目上传上来看看吧。

 或者升级到狐表的最新版本。

--  作者:hawkerwin
--  发布时间:2012/10/12 16:18:00
--  


[此贴子已经被作者于2012-10-12 18:23:05编辑过]

--  作者:hawkerwin
--  发布时间:2012/10/12 16:19:00
--  
新版本也不行
--  作者:lin_hailun
--  发布时间:2012/10/12 16:54:00
--  
 没办法,光看代码,看不出问题来,没有数据,不知道怎样重现你的错误。
--  作者:hawkerwin
--  发布时间:2012/10/12 17:16:00
--  

[此贴子已经被作者于2012-10-12 18:23:18编辑过]

--  作者:狐狸爸爸
--  发布时间:2012/10/12 17:54:00
--  

If e.Col.Name = "Actions" Then
    e.Cancel = True \'取消默认动作
    Dim Result As DialogResult
    Result = MessageBox.Show("您确认要结算此订单?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If Result = DialogResult.Yes Then
        Tables("Paid").AddNew
        Dim dr As Row = Tables("Paid").Current
        Dim dr1 As Row =Tables("Completed").Current
        dr("DeliveredTime")=dr1("Date")
        dr("ID")=dr1("ID")
        dr("Buyer")=dr1("Buyer")
        dr("Game")=dr1("Game")
        dr("Server")=dr1("Server")
        dr("Character")=dr1("Character")
        dr("Amount")=dr1("Amount")
        dr("Price")=dr1("Price")
        dr("备注")= Date.Now & " " & _Name &" 标记订单为Paid." & Chr(13) & Chr(10)& dr1("备注")
        Tables("Completed").Current.Delete
        If Tables("Completed").Current IsNot Nothing Then
            Tables("Completed").Current.Save

        Else

             DataTables("Completed").Save()
        End If
        DataTables("Paid").Save
    End If
End If

[此贴子已经被作者于2012-10-12 17:57:51编辑过]

--  作者:hawkerwin
--  发布时间:2012/10/12 18:06:00
--  
原来是这里  解决了  谢谢狐狸爸爸  lin_hailun图片点击可在新窗口打开查看