因为一直使用内部账号登录,很多地方都用到了user.group user.name等信息,也不想自己改造登陆窗口,最近考虑到使用范围,想区分区域,加载不同的user表,这样登陆名不至于显示太多
在BeforeConnectOuterDataSource 写入一下代码,是可以通过连接不同的数据库,使用名称相同的user表,来实现不同区域账号的登陆(如下代码,可以实现)
但是这种情况,必须建立多个数据库(不同数据源),在各自的数据库下面使用同一张user表(表名需一致),这样可以加载不同区域的用户信息实现登陆。
有没有办法,可以使用同一数据源,在BeforeConnectOuterDataSource 中,使用代码选择不同的user表(使用同一数据源的user1表或user2表)?
If FileSys.FileExists(ProjectPath & "config.xml") Then
Dim xml As String=FileSys.ReadAllText(ProjectPath + "config.xml", Encoding.Default)
Dim xo As XObject = XObject.Parse(xml)
Dim DistrictCode As String =xo("DistrictCode").Tostring
If e.name = "账号" Then
Select Case DistrictCode
Case "330522"
e.C
Case Else
e.Cfont-family: Verdana;">*.*.*.*"
End Select
End If
End If