Foxtable(狐表)用户栏目专家坐堂 → 数据库设置问题


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

主题:数据库设置问题

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


加好友 发短信
等级:五尾狐 帖子:1064 积分:7581 威望:0 精华:0 注册:2009/6/24 9:44:00
数据库设置问题  发帖心情 Post By:2021/7/24 13:49:00 [显示全部帖子]

我在一台电脑上已经开发完软件,数据库用的是自己软件目录中的data.mdb,发布软件之后,发布程序拷贝到了另一台电脑,另一台电脑的数据库位置换了,比如是在d:\data\data.mdb,请问我在软件发布之前,怎样设置好这个数据库目录,之后才能正常运行?

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


加好友 发短信
等级:五尾狐 帖子:1064 积分:7581 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2021/7/24 18:21:00 [显示全部帖子]

第二次使用呢?我这个目标数据库位置不能变

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


加好友 发短信
等级:五尾狐 帖子:1064 积分:7581 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2021/7/27 15:31:00 [显示全部帖子]

你也可以用另一种方法解决,在项目文件目录下创建一个ip.txt的文本文件,在该文件中输入最新的IP地址,并在BeforeConnectOuterDataSource事件中设置如下代码:

Dim ipFile As String = e.ProjectPath & "ip.txt"
If
 e.Name = "销售数据" Then
    If
 Filesys.FileExists(ipFile) Then
        Dim
 ip As String = FileSys.ReadAllText(ipFile)
        e.ConnectionString = e.ConnectionString.Replace("119.119.120.120",ip)
    End 
If

End
 If


老师,我的数据库在共享盘Z盘下的data\data.mdb,请问这样的话怎么写?


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


加好友 发短信
等级:五尾狐 帖子:1064 积分:7581 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2021/7/28 11:49:00 [显示全部帖子]

If e.name = "data" Then
    e.Connec tion String = "Provider=Micro soft.Jet.OLE DB.4.0;Data Source=//192.168.0.68/data/data.mdb;Persist Security Info=False"
End If

这样设置之后,打开软件,提示找不到数据库。
[此贴子已经被作者于2021/7/28 11:49:49编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1064 积分:7581 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2021/7/28 12:39:00 [显示全部帖子]

我这个是群晖的网络硬盘,用的映射z盘符,我改成z:\data\data.mdb就可以了。另外,我这个网络硬盘上的mdb数据库,有新的数据上传进去之后,我在电脑上需要怎样操作,才能重新载入新的数据?

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


加好友 发短信
等级:五尾狐 帖子:1064 积分:7581 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2021/7/29 9:15:00 [显示全部帖子]

老师,用动态加载可以吗?

 回到顶部