怎么才能让VB认识WORKSPACE对象？

Question

怎么才能让VB认识WORKSPACE对象？

Answer 1

Dim ws As Workspace
Dim a As DBEngine
Set ws = CreateWorkspace("myspace", "sa", "ry1237689", dbUseODBC)
Set dbs = ws.OpenDatabase("d:\mssql\data\ry_DATA.mdf", False, False, "ODBC;Driver=SQL Server;UID=sa;PWD=ry1237689;DATABASE=ry")
我这么写它说ODBC调用失败，请问哪不对呀？？？？？

Answer 2

不好意思写错了，是：
Dim cn As ADODB.Connection
cn.ConnectionString = "DRIVER=SQL Server;SERVER=127.0.0.1;UID=sa;PWD=ry1237689;DATABASE=ry"
cn.Open
它说：object variable or with block variable not set

Answer 3

Dim cn As new ADODB.Connection