主题：[求助]请帮我看一下保存按钮哪里错了

前面的代码修改下

    For Each dr As DataRow In DataTables(e.Form.TableName).DataRows
        If dr.RowState = DataRowState.Added Then
            xzh.Add(dr("iOrd"))
        Else If dr.RowState = DataRowState.Modified Then
            xgh.add(dr("iOrd"))
        End If
    Next

如果还出错，请说明，如何测试后出问题？

1、为什么要写 delete from ？ 你逻辑是什么？

2、不要吞掉错误，出错的话，弹出错误，建议你加入msgbox调试一下你的逻辑。

        msgbox(ex.Message)
        Connections("wjexcel").Rollback() '回滚事务,撤销所有操作
    End Try

提示错误，就是说没有find到对应的行

If dr Is Nothing Then

End If

http://www.foxtable.com/webhelp/scr/1485.htm

方法一：你iord列改成整数列

方法二：查询加上单引号  .Find("iOrd = '" & i & "'")

1、保存的时候弹出什么错误？不要吞掉try catch的错误。

2、删除数据，那你就测试你删除的代码，弹出msgobx看有什么问题。delete form 语句等等的逻辑看是否有问题，你删除后有可能没新增回来。还有就是比如你关闭窗口执行的deleteFor语句。

3、不会做，就参考人家的例子 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=53006&skin=0

 新增出错说明你逻辑有问题，加入msgbox看对应的值弹出有没有问题。

 不会做，就直接看人家的例子 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=53006&skin=0

用DataRows获取有问题，改成用select获取即可

DataTables("表A").Select("").Count

 用Select可以循环所有的行。

 dataRows有bug。