Foxtable(狐表)用户栏目专家坐堂 → 选择重新连接不同的mdb文件后,客户端不关闭 象刷新那样就实现吗


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

主题:选择重新连接不同的mdb文件后,客户端不关闭 象刷新那样就实现吗

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
选择重新连接不同的mdb文件后,客户端不关闭 象刷新那样就实现吗  发帖心情 Post By:2016/3/6 17:44:00 [显示全部帖子]

 
我做了个功能就是 用户可以把 他们使用中的模版 不会设置的上传到ftp里面,然后我服务器电脑也做了个客户端 导入客户的模版,但是有个问题,因为 模版使用数据结构的mdb文件每个客户都是自定义的,不一样所以我在服务器这边帮他们该模版的时候要重新连接每个客户的mdb文件,我可以实现连接mdb文件后,服务器的客户端不关闭 象刷新那样就实现吗

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/6 20:22:00 [显示全部帖子]

 我现在想的是一个窗口读取一个列表都是数据源mdb文件我选择一个然后就在新窗口中连接数据源,但是连接数据源只有项目事件里面才有啊
[此贴子已经被作者于2016/3/6 20:40:11编辑过]

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/6 21:37:00 [显示全部帖子]

 我根据帖子的这样写,但是有个问题 我每次数据文件里面的结构都是不一样的不一样的mdb文件 结构都不一样这样我没法使用dataTables.load(***)呢
图片点击可在新窗口打开查看


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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/7 8:42:00 [显示全部帖子]

 那我传递参数打开另外一个项目那个项目连接选择的数据源行不

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/7 12:53:00 [显示全部帖子]

 这样我试下后 是可以打开 但是 原来的项目 他会要关闭啊,我是想开始的项目也不关闭

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/7 19:30:00 [显示全部帖子]

 现在我可以新打开一个项目 了
但是新打开的项目连接数据库
图片点击可在新窗口打开查看
MessageBox.Show("开始连接数据库")
Dim path As String = FileSys.ReadAllText( ProjectPath +"db.txt"  )
MessageBox.Show(path)
Dim s As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + path + ";Persist Security Info=False"
e.ConnectionString = s

MessageBox.Show("连接数据库结束")
不执行呢
messbox 根本不执行
[此贴子已经被作者于2016/3/7 19:29:59编辑过]

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/7 19:35:00 [显示全部帖子]

 好像错了

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/8 15:46:00 [显示全部帖子]

怎么回事呀 我直接打开也不连接数据库,好像不执行这个方法

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/8 17:16:00 [显示全部帖子]

 哦 明白了 必须设置数据源 就算以后要该也要随便 设置一个,我随便设置一个,e.ProjectPath也该了 以后就 可以执行  。
但是 执行后怎么连接的新数据库  foxtable 没显示出来表

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2016/3/8 17:56:00 [显示全部帖子]

 e.ConnectionString = path
Connections.Add("db",path)
Dim lst As List(Of String)
lst = Connections("db").GetTableNames
For Each nm As String In lst
    Dim q As new OuterTableBuilder
    q.TableName = nm
    q.TableCaption = nm
    q.C
    q.SelectString = "Select * F rom {" + nm + "} "
    q.Build
Next
我这样加载表,我也可以看着表一个个加载了,但是加载完毕后程序自动打开主窗口后,加载的表又没了,就显示默认的三个表
MessageBox.Show("连接数据库结束:"+path)

 回到顶部
总数 32 1 2 3 4 下一页