ADODC连接SQL-SERVER如何在超时自动出现SQL登录窗口

Question

我用ADODC连接SQL-Server，如何让连接超时时自动出现“SQL Server 登录”窗口(图:  http://img.pcpop.com/upimg2/2005/1/2/57437349.gif)，动态的配置服务器，用户名....等？谢谢！

Answer 1

用捕错  on error goto XXXXX
连接超时会产生错误代码

Answer 2

关键是如何出现那个SQL-Server登录界面，这个界面好像是OLEDB里面自带的。

Answer 3

看看这个，如果不行，自己做一个吧Option Explicit'引用Microsoft OLE DB Service Component 1.0 Type Libaray
'然后类似这样Private Sub Command1_Click()
Dim oCnn As Connection
Dim oDataLink As New DataLinksoDataLink.hWnd = Me.hWnd
Set oCnn = oDataLink.PromptNew()
Debug.Print oCnn.ConnectionStringCall oDataLink.PromptEdit(oCnn)
Debug.Print oCnn.ConnectionString
End Sub