Foxtable(狐表)用户栏目专家坐堂 → 切换数据源出错


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

主题:切换数据源出错

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


加好友 发短信
等级:八尾狐 帖子:1930 积分:17564 威望:0 精华:0 注册:2014/7/29 19:09:00
切换数据源出错  发帖心情 Post By:2022/5/9 16:21:00 [只看该作者]

Dim s As String
    s = "Provider=SQLOLEDB.1;Password=" & dbPwd & ";Persist Security Info=True;User ID=" & dbUser & ";Initial Catalog=" & dbName & ";Data Source=" & Path & "," & dbPort & ")"
    
    '先卸载原数据源的表
    DataTables.Unload("IPSet")
    Connections.Delete("test")
    
    '重新按新数据源打开项目
    Syscmd.Project.Open(ProjectPath & "Connection.foxdb", s)
    e.Form.close

用新的数据源连接字符重新打开项目时如何删除旧数据源中的表及数据源,用上面红色的代码没有用,会提示出错

图片点击可在新窗口打开查看此主题相关图片如下:oa流程.jpg
图片点击可在新窗口打开查看

谢谢!



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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 16:24:00 [只看该作者]

彻底删除数据库里的表?参考:http://www.foxtable.com/webhelp/topics/2122.htm

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


加好友 发短信
等级:八尾狐 帖子:1930 积分:17564 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2022/5/9 16:41:00 [只看该作者]

是否删除旧数据源的表倒是无所谓,主要是切换数据源后如果不处理,原来的数据源及其加载的表会怎么样,自动消失吗?不知道那个错误是怎么出现的?

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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 16:54:00 [只看该作者]

不知道具体怎么切换数据源的。切换数据源前要自己卸载旧数据源的所有表,否则肯定会出错。

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


加好友 发短信
等级:八尾狐 帖子:1930 积分:17564 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2022/5/9 17:11:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:oa流程.jpg
图片点击可在新窗口打开查看

旧的数据源test是一个access的数据库,下面就一个IPSet的表,如上面结构,存储了实际的数据库连接参数而已,用其拼接成新的数据源连接字符串.
一楼的红色代码已经卸载了这个表及删除的旧的数据源,但还是会出错

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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 17:20:00 [只看该作者]

请上传实例说明。

或者看看这个:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:选择数据源.zip

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


加好友 发短信
等级:八尾狐 帖子:1930 积分:17564 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2022/5/9 22:34:00 [只看该作者]

可以了,
如果想在AfterOpenProject事件中根据用户打开项目时是否按下键盘上某个按键如Alt键,来确定是否显示数据源设置的窗口,此时应该如何判断是否按下某个键?
谢谢!

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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 22:50:00 [只看该作者]

If (System.Windows.Forms.Control.ModifierKeys And Keys.Control) = Keys.Control Then
    MessageBox.Show("Ctrl健被按下")
End If

 回到顶部