ADO创建连接对象失败
Private   Sub   Command1_Click()
        Dim   o   As   ADODB.Connection
        Set   o   =   New   ADODB.Connection
End   Sub

返回   Run-time   error   '429 '
ActiveX   component   can 't   create   object

说明：
我已经在VB6工程里引用了ADO组件
我的系统是Win   XP。

后来我重装了MDAC(ADO的安装包)，甚至重装了SQL   Server，
都还是不行。

以前也遇到过类似问题，是通过重装系统来解决的。
大家有没有遇到过类似问题，是怎样解决的？


------解决方案--------------------
这样可以吗? 如果可以的话, 则说明你的引用不对, 如果不可以的话, 应该是MDAC的问题

Private Sub Command1_Click()
Dim o As object 'ADODB.Connection
Set o = createobject( "ADODB.Connection ")
End Sub
------解决方案--------------------
Dim o As ADODB.Connection
Set o = New ADODB.Connection

这种语法格式并没有问题。

可能是运行库有损坏造成的。
------解决方案--------------------
将引用的ado版本提高些看看