Foxtable(狐表)用户栏目专家坐堂 → 数据填充如何填入指定文本或数字


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

主题:数据填充如何填入指定文本或数字

帅哥哟,离线,有人找我吗?
netfox168
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2960 威望:0 精华:0 注册:2011/9/19 0:18:00
数据填充如何填入指定文本或数字  发帖心情 Post By:2011/12/6 0:15:00 [只看该作者]

有这样一段代码:

 

Dim f1 As New Filler

f1.SourceTable = DataTables("来源表")

f1.SourceCols = "字段1,字段2,字段3,字段4"

f1.DataTable = DataTables("目标表")

f1.DataCols = "字段1,字段2,字段3,字段4"

f1.ExcludeNullValue = True

f1.Fill()

 

假设我想将“来源表”中的“字段4” 用某固定“文本”或“数字”替代,填充行数和其他字段一样,不知是否可操作?


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/6 9:54:00 [只看该作者]

Dim f1 As New Filler

Dim cnt as integer = DataTables("目标表").DataRows.Count

f1.SourceTable = DataTables("来源表")

f1.SourceCols = "字段1,字段2,字段3"

f1.DataTable = DataTables("目标表")

f1.DataCols = "字段1,字段2,字段3"

f1.ExcludeNullValue = True

f1.Fill()

For i as integer= cnt to DataTables("目标表").DataRows.Count -1

    DataTables("目标表").DataRows(i)("字段4") = "固定的值"

next


 回到顶部