Foxtable(狐表)用户栏目专家坐堂 → 怎么写dataset的代码


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

主题:怎么写dataset的代码

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


加好友 发短信
等级:二尾狐 帖子:563 积分:4850 威望:0 精华:0 注册:2014/4/29 14:32:00
怎么写dataset的代码  发帖心情 Post By:2017/4/17 18:12:00 [只看该作者]

以下代码,我有连接fastreport,,在狐表中保存代码时,提示未定义类型,datacolumn,   红色字体部分要怎么写(建立多列关联)   
Dim  FDataSet = New System.Data.DataSet
Dim Table1 As New System.Data.DataTable
Dim Table2 As New System.Data.DataTable
Table1=DataTables("成绩表").BaseTable.copy
FDataSet.Tables.Add(Table1)
Table2=DataTables("表A").BaseTable.copy
FDataSet.Tables.Add(Table2)
Dim mc1 As String = DataTables("表A").BaseTable.copy.TableName
Dim mc2 As String = DataTables("成绩表").BaseTable.copy.TableName

Dim spgg1() As DataColumn = {FDataSet.Tables(mc1).Columns("第一列"),FDataSet.Tables(mc1).Columns("第二列")}
Dim spgg2() As DataColumn = {FDataSet.Tables(mc2).Columns("学号1"),FDataSet.Tables(mc2).Columns("学号2")}

FDataSet.relations.add("ttt",spgg1,spgg2,False)
'新建关系


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/17 18:14:00 [只看该作者]

改成

 

system.data.datacolumn


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


加好友 发短信
等级:二尾狐 帖子:563 积分:4850 威望:0 精华:0 注册:2014/4/29 14:32:00
  发帖心情 Post By:2017/4/17 20:41:00 [只看该作者]

提示这个
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170417203620.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:二尾狐 帖子:563 积分:4850 威望:0 精华:0 注册:2014/4/29 14:32:00
  发帖心情 Post By:2017/4/17 20:48:00 [只看该作者]

执行这句时出错FDataSet.relations.add("ttt",spgg1,spgg2,False)

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/17 21:24:00 [只看该作者]

 实例发上来测试吧。你 spgg1,spgg2 应该有空值。


 回到顶部