VB中如何调用系统的设置ADO连接字符串的窗体？

Question

如题。

Answer 1

解决了。在系统中查找文件 oledb32.dll
应在 E:\Program Files\Common Files\System\Ole DB
我的操作系统在 E:\
在VB中引用。或者引用
Microsoft OLE DB Service Component 1.0 Type Libary和Microsoft ActiveX Data Objects 2.x Library然后执行：
　　Dim dlTemp As MSDASC.DataLinks 
　　Dim cnTemp As ADODB.connection 　　Set dlTemp = New MSDASC.DataLinks 
　　Set cnTemp = New ADODB.connection 
　　dlTemp.PromptEdit cnTemp 　　Text1.Text = cnTemp.ConnectionString 
　　Set dlTemp = Nothing 
　　Set cnTemp = Nothing