各位大哥大姐 给小弟点帮助吧!

为什么 执行
Public connstr As String
Public conn As ADODB.ConnectionPrivate Sub Form_Load()
ctrcnn = "provider=sqloledb;" & "data source=xiaodeng;" & "initial catalog=BookStoreForVB6;" & "user id=sa;" & "password=;"
Set conn = New ADODB.Connection
conn.ConnectionString = connstr
conn.Open
End Sub
这段代码只后 会显示[Microsoft][ODBC 驱动程序管理器]未发现数据源名称并且未指定默认驱动程序