Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]数据源切换


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

主题：[求助]数据源切换
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/12/31 9:48:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:nwcserver.zip
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/12/31 10:42:00 [显示全部帖子]

按钮必须加上e.cancel = true

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/12/31 11:21:00 [显示全部帖子]

我测试没有问题。不行的话就不要在按钮里重启项目，使用全局变量记录理解字符串，放到afteropenproject事件打开窗口之后调用重启代码

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


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/12/31 11:40:00 [显示全部帖子]

按钮使用全局变量记录连接字符串，

afteropenproject事件

forms("登录窗口").open
Syscmd.Project.Open(ProjectFile,全局变量1，全局变量2)
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/12/31 13:37:00 [显示全部帖子]

If OpenFileArgs.Count = 0 Then
    Forms("userload").Open
    Syscmd.Project.Open(ProjectFile, constr1,constr2)
Else
    forms("主窗口").Open
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/1/5 8:35:00 [显示全部帖子]

备份是备份在数据库所在的电脑上的，如果你要备份到你自己的计算机，你还要把备份的bak文件下载下来。dlg.filename必须是服务器的本机地址
[此贴子已经被作者于2021/1/5 8:36:23编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/1/5 13:54:00 [显示全部帖子]

如果程序是在客户端运行的，备份路径肯定有问题，这个路径必须是服务器的本地路径

我这样测试没有问题

BeforeConnectOuterDataSource事件
If e.name = "test" Then
    e.C
End If

命令窗口
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "use master;BACKUP DATABASE test To DISK ='c:\test\123.bak' With FORMAT,CHECKSUM;"
cmd.ExecuteNonQuery()
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/1/5 14:27:00 [显示全部帖子]


 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/1/5 14:32:00 [显示全部帖子]

请上传实例说明

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/1/6 9:45:00 [显示全部帖子]

数据库无法附加，请发数据库备份文件，不要发脱离的数据库文件

 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 6 次数据查询