Question

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

y1 = inputbox("1.请输入你一个异性朋友的名字","")
如何在这里输入“确定”的时候将输入的信息存到ACCESS数据库 ！
麻烦说详细点

Answer 1

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.
完毕。

Answer 2

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