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版本提高些看看