Foxtable(狐表)用户栏目专家坐堂 → 如何加载浏览没有设置主键的外部数据


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

主题:如何加载浏览没有设置主键的外部数据

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


加好友 发短信
等级:一尾狐 帖子:404 积分:3080 威望:0 精华:0 注册:2013/4/9 11:49:00
如何加载浏览没有设置主键的外部数据  发帖心情 Post By:2014/9/5 14:32:00 [只看该作者]

我的是access数据表,数据源名称是hk ,请问如何加载 并添加到checklistbox中


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/9/5 14:33:00 [只看该作者]

你要加载某个表的某个列的内容? 还是想怎么样,能否说具体一点.

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


加好友 发短信
等级:一尾狐 帖子:404 积分:3080 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2014/9/5 14:37:00 [只看该作者]

加载表名,不用加载列的内容


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


加好友 发短信
等级:一尾狐 帖子:404 积分:3080 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2014/9/5 14:38:00 [只看该作者]

是access表,没有关键字段的


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


加好友 发短信
等级:一尾狐 帖子:404 积分:3080 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2014/9/5 14:39:00 [只看该作者]

For Each tb As Table In Tables
    Output.Show(tb.Name)

Next

用这个命令只能加载有关键字段并且只能是已经在外部表管事器中的表




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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/5 15:01:00 [只看该作者]

 只能当查询表来用,加入查询表,参考

 

http://www.foxtable.com/help/topics/0695.htm

 


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/9/5 15:04:00 [只看该作者]


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


加好友 发短信
等级:一尾狐 帖子:404 积分:3080 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2014/9/5 17:18:00 [只看该作者]

Dim cmb As WinForm.CheckedListBox
cmb = e.Form.Controls("CheckedListBox1")
Dim lst As List(Of String)
lst = Connections("hk").GetTableNames
For Each nm As String In lst
cmb.ComboList =nm
Next
这段代码只能加载最后一个表名,是什么原因


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/5 17:21:00 [只看该作者]

Dim cmb As WinForm.CheckedListBox
cmb = e.Form.Controls("CheckedListBox1")
Dim lst As List(Of String)
lst = Connections("hk").GetTableNames

cmb.ComboList = String.Join("|", lst.ToArray)


 回到顶部