我的程序：
Private Sub Form_Load()
Dim CON As New ADODB.CONNECTION

Set CON = New ADODB.CONNECTION

CON.ConnectionString = "driver={sql server};server=服务器名;uid=sa;pwd=;database=数据库名"
CON.Open

End Sub

编译时的错误：
第一行：As New ADODB.CONNECTION
User-defined type not defined

大虾帮帮忙，是不是我少装了什么东西？

修改后的程序：
Private Sub Form_Load()
Dim CON As New ADODB.CONNECTION

CON.ConnectionString = "driver={sql server};server=服务器名;uid=sa;pwd=;database=数据库名"
CON.Open

End Sub

可是错误还是一样的。

不知道该如何引用？