dao:
dim db as dao.database
dim rst as dao.recordset
set db=opendatabase("Order")'if u have path,write here
set rst=db.openrecordset("information")
with rst
.addnew
!地址ID="A01"
!订单ID="101"
!产品ID="12"
!单价=22.00
!数量=20000
.update
end with
rst.close
db.close
private sub text1.validate()
if len(text1)>XX 'xx is ur valid length
sendkey "{TAB}"
end if
end sub
ok?
open database
open recordset
recordset("ID1")=text1.text
recordset("ID2")=text2.text
recordset("ID3")=text3.text
recordset("单价")=text4.text
recordset("数量")=text5.text
update recordset
close recordset
close database
OK?
方法二:
在form上放置data控件,5个textbox
定义data的连接和table的名字
定义textbox的数据源为data
textbox绑定字段名
加一个按钮
一个是update
然后运行就可以了
code:
sub update_click()
data.update
end sub