我运行时出现，用户未定义数据类型是什么情况，各位大哥帮帮忙

Question

我是往数据库里存东西，存不进啊
Private Sub Command1_Click()
Dim yn As ADODB.Recordset
Set yn = New ADODB.Recordset
Dim yp As ADODB.Recordset
Set yp = New ADODB.Recordset
Adodc1.Recordset.Fields("yn") = Text1.Text
Adodc1.Recordset.Fields("yp") = Text2.Text
Adodc1.Recordset.Update
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = True
Command4.Enabled = True
End Sub

Answer 1

乱七八糟地，你到底想用ADODB还是用ADODC，用ADODB要引用ADODB（工程--引用 Microsoft ActiveX Data Objects 2.5 Library），用ADODC要添加ADODC控件（工程--部件 Microsoft ADO Data Control 6.0 (SP6)）其它还有要先连接数据，再添加或修改记录。
------------------------------------------------------------------------------------------------百度Hi群1358368

Answer 2

lz从哪拼凑的代码,先看看我的例子就明白了
连接Access数据库的例子