以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用户登录设计问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40626)

--  作者:magangzmc
--  发布时间:2013/9/25 9:08:00
--  用户登录设计问题
我在用户扩展属性设置了服务器和sa密码
当登录的时候,填写服务器和sa密码,点确定登录后判断数据库连接是否通过,不通过将提示并重新显示登陆框。
我在BeforeConnectOuterDataSource事件代码如下
Select Case e.Name
    Case "DB"
        e.C & e.User.ExtendedValues("SA密码") & ";Initial Catalog=UFDATA_" & e.User.ExtendedValues("账套号") & "_" & e.User.ExtendedValues("会计年度") & ";Data Source=" & e.User.ExtendedValues("服务器")
    Case "Master"
        e.C & e.User.ExtendedValues("SA密码") & ";Initial Catalog=Master;Data Source=" & e.User.ExtendedValues("服务器")
End Select

If Connections.TryConnect(e.ConnectionString)=False Then
    MessageBox.Show("数据源测试不通过!")
    Syscmd.Project.SwitchUser()
End If
运行可以提示,但Syscmd.Project.SwitchUser()这句不能显示登录框呀?

--  作者:Bin
--  发布时间:2013/9/25 9:12:00
--  
 呵呵,不可以这么做的呢
执行BeforeConnectOuterDataSource 事件时 程序还没完全生成呢