在Access中想做个窗体录入界面,通过界面数据保存到数据表中

如题所述

第1个回答  2011-04-11
dim stemp as string
dim rs as adodb.recordset
set rs = new adodb.recordset

if isnull(me.编号)=false then
msgbox "该记录已存在",vbOKOnly + vbInformation, "提示"
else
stemp = "select * from 表名"
rs.open stemp ,currentproject.connection, adOpenKeyset, adLockBatchOptimistic
rs.addnew
rs("字段名1") = me.字段名1
rs("字段名2") = me.字段名2

.
.
.
rs("字段名n") = me.字段名n

rs.UpdateBatch
end if
第2个回答  2011-04-08
我不大懂access 但是你可以用vc做界面 然后用vc调用数据库的东西,好多书上都有类似的例子本回答被提问者和网友采纳
相似回答