| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 新增行的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=67369) |
| -- 作者：qianqian1530 -- 发布时间：2015/4/23 5:51:00 -- 新增行的问题 \'\'\' If e.DataRow.RowState = DataRowState.Added Then Dim dsr As DataRow = DataTables("S_系统_自動更新").AddNew dsr("系统编号") = e.DataRow("系统编号") dsr("域名") = e.DataRow("域名") dsr("地址") = e.DataRow("地址") End If *这个代码我写在了 DataRowAdded 里面 当前表新增行的时候, 将指定列新增到 另一个 表里. 但是, 另一个表里行是增加了, 但数据没过来. 为什么呢?
|
| -- 作者：新福星 -- 发布时间：2015/4/23 6:20:00 -- If e.DataRow.RowState = DataRowState.Added Then
Dim dsr As Row = Tables("S_系统_自動更新").AddNew
dsr("系统编号") = e.DataRow("系统编号")
dsr("域名") = e.DataRow("域名")
dsr("地址") = e.DataRow("地址")
dsr.save
End If
这样试试
|
| -- 作者：qianqian1530 -- 发布时间：2015/4/23 8:25:00 -- 还是一样, 没效果. |
| -- 作者：qianqian1530 -- 发布时间：2015/4/23 8:43:00 -- .... |
| -- 作者：Bin -- 发布时间：2015/4/23 8:44:00 -- DataRowAdded 是新增行事件, 你刚新增,你又没用代码给它赋值.此时何来的值呢. |
| -- 作者：qianqian1530 -- 发布时间：2015/4/23 8:48:00 -- 我是用代码赋值的啊 Dim dr As DataRow = DataTables("S_系统_店舗情報").AddNew() Dim sxd As String For Each drs As DataRow In DataTables("S_系统_店舗情報").Select("")
sxd & =drs("系统编号") & "|" Next For i As Integer = 1 To 10000
If sxd > "" AndAlso sxd.Contains("SD_" & Format(i,"0000")) Then
Else
dr("系统编号") = "SD_" & Format(i,"0000")
e.Form.Controls("系统编号").text = "SD_" & Format(i,"0000")
Exit For
End If Next dr("域名") = e.Form.Controls("TextBox3").text dr("地址") = e.Form.Controls("TextBox4").text DataTables("S_系统_店舗情報").Save() |
| -- 作者：Bin -- 发布时间：2015/4/23 8:49:00 -- 你新增行的瞬间,就触发新增行事件了. 触发完了.再继续执行下面的代码的. 你把你的代码从新增行中移出来.放到这段代码的后面吧
|
| -- 作者：qianqian1530 -- 发布时间：2015/4/23 8:52:00 -- 嗯 |