[求助] 看了很多的导入示例,但没有一个是把外部数据mdb导入窗口表的 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 看了很多的导入示例,但没有一个是把外部数据mdb导入窗口表的

共有6296人关注过本帖树形打印复制链接主题：[求助] 看了很多的导入示例,但没有一个是把外部数据mdb导入窗口表的

coch2004

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：604 积分：6988 威望：0 精华：0 注册：2012/5/30 16:01:00

[求助] 看了很多的导入示例,但没有一个是把外部数据mdb导入窗口表的 发帖心情

Post By：2014/6/27 1:09:00 [显示全部帖子]

求助把外部数据mdb导入窗口表的代码

(窗口表没有绑定任何数据表)

coch2004

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：604 积分：6988 威望：0 精华：0 注册：2012/5/30 16:01:00

Post By：2014/6/27 11:37:00 [显示全部帖子]

呵呵

coch2004

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：604 积分：6988 威望：0 精华：0 注册：2012/5/30 16:01:00

Post By：2014/6/27 12:22:00 [显示全部帖子]

以下是引用sloyy在2014-6-27 1:49:00的发言：
最简单的例子:

Tables("窗口1_Table1").Fill("Select * From {员工表}","数据源名称",True)

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Msgbox(dlg.FileName)
    Connections.Add("tbl","Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & dlg.FileName & "';Password=windows8.1;Persist Security Info=False")
    Tables(e.form.name & "_Table1").Fill("Select * From {供应商报价_Table1","tbl",True)
End If

sloyy求助,是这样的吗?

下一主题 >> << 上一主题

主题：[求助] 看了很多的导入示例,但没有一个是把外部数据mdb导入窗口表的