如何将我做好的表格里的数据保存到我做好的数据库里
发布网友
发布时间：2022-04-21 23:47
共1个回答
热心网友
时间：2023-09-20 03:52
OpenConn
Adodc2.RecordSource
=
"select
*
from
usertt
where
卡号='"
&
Text9.Text
&
"'"
Adodc2.Refresh
If
Adodc2.Recordset.RecordCount
>
0
Then
MAGBOX"已有此记录",32,"提示"
Else
'下面的这个就是把数据保存到数据库中的
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields("卡号")
=
Text9.Text
Adodc2.Recordset.Fields("分类")
=
Combo5.Text
Adodc2.Recordset.Fields("姓名")
=
Text3.Text
Adodc2.Recordset.Fields("领卡日期")
=
Format(Now,
"yyyy-mm-dd
hh:mm:ss")
Adodc2.Recordset.Update
End
If
End
If
要是表格中就先定位在表格的那个地方,在保存,等号后面换掉就行了.
