Dim adoConn As ADODB.Connection = New ADODB.Connection()
Dim adoRS As ADODB.Recordset = New ADODB.Recordset() adoConn.Open("Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=Northwind;Integrated Security=SSPI;", "", "", -1)
adoRS.Open("SELECT * FROM Customers", adoConn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, 1)
为什么提示D:\myprog\vb\Form1.vb(64): 未定义类型“ADODB.Connection”。
D:\myprog\vb\Form1.vb(65): 未定义类型“ADODB.Recordset”。
帮帮我,大侠们
Dim adoRS As ADODB.Recordset = New ADODB.Recordset() adoConn.Open("Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=Northwind;Integrated Security=SSPI;", "", "", -1)
adoRS.Open("SELECT * FROM Customers", adoConn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, 1)
为什么提示D:\myprog\vb\Form1.vb(64): 未定义类型“ADODB.Connection”。
D:\myprog\vb\Form1.vb(65): 未定义类型“ADODB.Recordset”。
帮帮我,大侠们
Dim adoConn As ADODB.Connection = New ADODB.Connection()
Dim adoRS As ADODB.Recordset = New ADODB.Recordset()
为
Dim adoConn As New ADODB.Connection = New ADODB.Connection()
Dim adoRS As New ADODB.Recordset = New ADODB.Recordset()
在窗体上画一个该控件,点属性,按步骤操作,得到连接字符串,再删除就OK了.
然后:
Dim adoConn As New ADODB.Connection
Dim adoRS As New ADODB.Recordset
OK了!