我在用户扩展属性设置了服务器和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()这句不能显示登录框呀?