ADODB.Connection 类型问题

Question

Dim conn As ADODB.Connection
conn = currentproject.connection
这个currentproject.connection默认的值为
"Provider=Microsoft.Access.OLEDB.10.0;Persist Security Info=False;Data Source=192.168.1.1;User ID=sa;Initial Catalog=档案管理;Data Provider=SQLOLEDB.1"但运行时，会提示类型不匹配。必须引用后面那2个才能正常运行。问题是必须在每个人用的机器上都设置下，太麻烦了。于是我就想在代码上做修改。如果将连接数据库手动写成这个Dim strcon As String
strcon = ""
strcon = "PROVIDER=SQLOLEDB.1;PASSWORD=sa;PERSIST SECURITY INFO=false;USER ID=sa;INITIAL CATALOG=档案管理;DATA SOURCE=192.168.1.1"
Set conn = Application.CurrentProject.Connection
Application.CurrentProject.OpenConnection strcon
Set conn = Application.CurrentProject.Connection可以正常运行，不过好像速度慢了很多。
有什么既方便速度又快的方法吗？

Answer 1

前台用的是ACCESS， 后台数据库是SQL 2000.就是 ADP开发啊。

Answer 2

你试下引用ADO2.8,应该能解决你的问题.

Answer 3

Dim conn As ADODB.Connection
改为如下试试：
Dim conn As New ADODB.Connection

Answer 4

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
With conn
    .ConnectionString = "PROVIDER=SQLOLEDB.1;PASSWORD=sa;PERSIST SECURITY INFO=false;USER ID=sa;INITIAL CATALOG=木箱管理;DATA SOURCE=192.168.1.222"
    .Open
End With引用不变，我把链接写成这样就好了。太开心了