ADO要定义么?Private Sub Command1_Click()Dim Con As New ADODB.Connection ‘ 出现类型结构未定义Dim Rs As New ADODB.RecordsetCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Data\db1.mdb;Persist Security Info=False"R

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 00:19:54
ADO要定义么?Private Sub Command1_Click()Dim Con As New ADODB.Connection ‘ 出现类型结构未定义Dim Rs As New ADODB.RecordsetCon.Open

ADO要定义么?Private Sub Command1_Click()Dim Con As New ADODB.Connection ‘ 出现类型结构未定义Dim Rs As New ADODB.RecordsetCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Data\db1.mdb;Persist Security Info=False"R
ADO要定义么?
Private Sub Command1_Click()
Dim Con As New ADODB.Connection ‘ 出现类型结构未定义
Dim Rs As New ADODB.Recordset
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Data\db1.mdb;Persist Security Info=False"
Rs.Open "select * from 表1",Con,adOpenKeyset,adLockBatchOptimistic
Rs.AddNew
Rs.Fields(1) = Text1.Text
Rs.Fields(2) = Text2.Text
Rs.Update
Rs.Close
conn.Close
MsgBox ("添加记录成功!")
Adodc1.Refresh
End Sub

ADO要定义么?Private Sub Command1_Click()Dim Con As New ADODB.Connection ‘ 出现类型结构未定义Dim Rs As New ADODB.RecordsetCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Data\db1.mdb;Persist Security Info=False"R
class CDrawDlg;
void DateToInt(CString date,int& year,int& month,int& day);
bool OpenPrintFrame(CWnd* parent,CDrawDlg * m_draw);
这个为什么会放在类LRunSql的头文件里?因为这些不是类的定义代码,而是声明,和函数的声明.因为在类LRunSql的cpp文件中,会需要用到上面这两个函数.而这两个函数中有 CDrawDlg类型的参数,我们知道,对于一种变量类型,必须先定义才能使用.因此这里先声明class CDrawDlg,说明有这么一个类,但他的定义在其他的地方(当然,在这里就是它对应的头文件和cpp了),这样下面的可以使用他了.不然的话,你在定义上面的两个函数是,他会报错,说没有CDrawDlg这种变量类型.
如果不这样,你也可以将CDrawDlg的.h文件包含进来,这样也可以使用这种类型了,但有时会遇到重定义之类的问题,尤其是你在多个地方都这么包含的话.
其实这种情况经常会发生,你去看看MFC里的代码就会发现,他就用了很多这样的,有时你自己也需要这么做.
请参考