主题：保存并更新

把窗口1_Table1查询缴学费信息，保存到缴餐费表里，并已有信息更新，请老师指教，谢谢！

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目19.zip

把窗口1_Table1行增加到缴餐费表里，缴餐费表已经有的更新，保存按钮代码：

Dim nms() As String = {"学期","班级","身份证号","缴费日期","缴费金额","收款人"}
Dim t As Table = e.Form.controls("Table1").Table
For n As Integer = 1 To t.Rows.Count -1
    Dim dr As DataRow = DataTables("缴餐费").SQLFind("学期 = '20181' And 身份证号 = '"& t.Current("身份证号") &"'")
    If dr Is Nothing Then  '如果不存在同编号的订单
        dr =  DataTables("缴学费").AddNew(n)

？？？
    End If
Next