Foxtable(狐表)用户栏目专家坐堂 → 关于外部表的数据填充!数据接收表不能是临时表?{已解决}


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

主题:关于外部表的数据填充!数据接收表不能是临时表?{已解决}

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


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/10/16 22:20:00 [只看该作者]

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT * From {cs} where [合格情况]=true"
dt = cmd.ExecuteReader()

'Dim cmd1 As New SQLCommand
'Dim dt1 As DataTable
'cmd1.C
'cmd1.CommandText = "SELECT * From {cs1} "
'dt1 = cmd1.ExecuteReader()

Dim fl As New Filler
fl.SourceTable = dt '指定数据来源
fl.SourceCols = "身份证号" '指定数据来源列
fl.DataTable = DataTables("cs1") '指定数据接收表
fl.DataCols = "身份证号" '指定数据接收列
 
 
fl.ExcludenullValue= True
fl.ExcludeExistValue=True
fl.Fill() '填充数据

如果不执行红色的部分,已经保存在后台的数据,没法参与不重复的比较,填充是会将已经存在的身份证号重复填充!!

fl.DataTable = DataTables("cs1") '指定数据接收表   

还是这句  为什么不能用 dt1????

为说明我的想法,我在项目里加了 "[_Identify] Is Null",开始不加载数据

然后filler填充! 然后再看看 access 的 cs1,就重复了



 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

[此贴子已经被作者于2013-10-17 12:06:37编辑过]

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


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/10/17 10:18:00 [只看该作者]

我再顶上来!希望能得到回答

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


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/10/17 11:09:00 [只看该作者]

找到原因了!dt1是临时表!不是database!

 

继续讨论研究一下!!,好了我发上来,欢迎各位指教


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


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/10/17 12:08:00 [只看该作者]

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C

cmd.CommandText = "SELECT * From {cs} where [合格情况]=true"
dt = cmd.ExecuteReader()

 

Dim cmd1 As New SQLCommand
Dim dt1 As DataTable
cmd.C

cmd1.CommandText = "SELECT * From {cs1} "
dt1 = cmd1.ExecuteReader(True)

 

Dim fl As New Filler
fl.SourceTable = dt '指定数据来源
fl.SourceCols = "身份证号" '指定数据来源列
fl.DataTable = dt1 '指定数据接收表
fl.DataCols = "身份证号" '指定数据接收列
fl.ExcludenullValue= True
fl.ExcludeExistValue=True
fl.Fill() '填充数据
dt1.save

 

 

找到原因了!!呵呵,那行红字

[此贴子已经被作者于2013-10-17 12:09:41编辑过]

 回到顶部
总数 14 上一页 1 2