Foxtable(狐表)用户栏目专家坐堂 → 用户登录


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

主题:用户登录

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15284 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2016/3/31 18:29:00 [只看该作者]

实际17楼的想法,写了以下代码,可是实现不了想要的功能,错在那里呢?
If Connections.TryConnect("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & fdr("远程数据源") & ";Persist Security Info=False") = True Then
            Connections.Add("喜洋洋数据", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & fdr("远程数据源") & ";Persist Security Info=False")
        Else
            Connections.Add("喜洋洋数据", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ProjectPath & fdr("数据源") & ";Persist Security Info=False")
        End If

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/31 19:32:00 [只看该作者]

If Connections.TryConnect(fdr("远程数据源")) = True Then
    Connections.Add("喜洋洋数据", fdr("远程数据源"))
Else
    Connections.Add("喜洋洋数据", fdr("远程数据源"))
End If


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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15284 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2016/4/1 7:59:00 [只看该作者]

换成22楼的就没有办法打开软件了,以下数据库的保存路径,这样做的目的是有时在办公室做就用服务器上的远程数据源,如果需要外出就用数据源
数据源的格式是  审计项目\张三.mdb   远程数据源的格式是  g:会计审计\审计软件\审计项目\张三.mdb  

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/1 9:32:00 [只看该作者]

If FileSys.FileExists(fdr("远程数据源")) Then
    Connections.Add("喜洋洋数据", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & fdr("远程数据源") & ";Persist Security Info=False")
Else
    Connections.Add("喜洋洋数据", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ProjectPath & fdr("数据源") & ";Persist Security Info=False")
End If

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15284 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2016/4/2 18:21:00 [只看该作者]

由于我做的审计项目千差万别,不同类型的审计项目要加载不同类型的数据库,在登录窗口中还需要加一个选择项-审计类型,但是软件是按包含全部类型设计的,比如 A、B两个类型,A类型需要加载的E、F表,B类型需要加载D、G表其他的表都是共同的,但是在设计软件的时候为了通用性EFDG四个表都有,甚至还有表名相同但格式不同,这些要求怎么来处理?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/3 11:23:00 [只看该作者]

1、表结构必须一样才能换数据源;

 

2、控制根据类型加载表不行?

 

3、如果表结构不同,根本就不能这样做,你做多个项目吧。


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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15284 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2016/4/28 17:31:00 [只看该作者]

做了一个审计软件并按上述方法做好用户登录窗口,但是目前这个审计软件使用的是ACCess数据库,并做已经做了多个审计项目,现在想往来sql server 2008 数据库过度,技术不成熟又担心失败后就不能用了,所以想逐步过度,先其中的一、二个项目使用sql server 2008 这样做是否就是需要双数据源,一些项目的数据源连接ACCess数据库,一些项目的数据源连接sql server 2008数据库,这样做可以吗?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/28 18:02:00 [只看该作者]

 可以,只要你在表里面记录某数据源是什么数据库就行。不同的数据库,拼凑不同的连接字符串就可以了。


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


加好友 发短信
等级:婴狐 帖子:26 积分:208 威望:0 精华:0 注册:2016/4/24 12:58:00
  发帖心情 Post By:2016/4/29 0:16:00 [只看该作者]

1234

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15284 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2016/5/4 8:31:00 [只看该作者]

用户登录时可能是局域网中的服务器,也可能是本地电脑中数据库,以下代码该怎么修改?
Connections.Add("鉴定软件", "Provider=SQLOLEDB.1;Password=55555555a;Persist Security Info=True;User ID=sa;Initial Catalog=" & fdr("数据源") & ";Data Source=192.168.0.100")
        Connections.Add("鉴定软件", "Provider=SQLOLEDB.1;Password=55555555a;Persist Security Info=True;User ID=sa;Initial Catalog=" & fdr("数据源") & ";Data Source=" & SysInfo.ComputerName & "")

 回到顶部
总数 69 上一页 1 2 3 4 5 6 7 下一页