VB inputbox 如何将返回值存入数据库

来源:百度知道 编辑:UC知道 时间:2024/05/29 14:51:04
y1 = inputbox("1.请输入你一个异性朋友的名字","")
如何在这里输入“确定”的时候将输入的信息存到ACCESS数据库 !
麻烦说详细点

dim db as database
dim rs as recordset
set db=opendatabase("你的数据库名字")
set rs=db.openrecordset("表名字")
rs.addnew
rs.fields("表中某个字段")=y1
rs.update
rs.close
db.close.
完毕。

不知道
又做那个缘分测试的网页啊?看到烦了