Foxtable(狐表) → 用户栏目 → 专家坐堂 → 新增行的问题


  共有3182人关注过本帖树形打印复制链接

主题：新增行的问题
美女呀，离线，留言给我吧！
qianqian1530
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00 		新增行的问题  发帖心情 Post By：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    里面

当前表新增行的时候,  将指定列新增到 另一个 表里. 

但是, 另一个表里行是增加了, 但数据没过来.

为什么呢?
 回到顶部
美女呀，离线，留言给我吧！
qianqian1530
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00 		  发帖心情 Post By：2015/4/23 8:25:00 [显示全部帖子]

  还是一样, 没效果.

 回到顶部
美女呀，离线，留言给我吧！
qianqian1530
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00 		  发帖心情 Post By：2015/4/23 8:43:00 [显示全部帖子]

....

 回到顶部
美女呀，离线，留言给我吧！
qianqian1530
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00 		  发帖心情 Post By：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()
 回到顶部
美女呀，离线，留言给我吧！
qianqian1530
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00 		  发帖心情 Post By：2015/4/23 8:52:00 [显示全部帖子]

嗯

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04590 秒, 5 次数据查询