VB高手们进 急~~~~~~~~~~~

来源：百度知道 编辑：UC知道 时间：2024/06/21 23:46:11
如何把text1中的内容保存到access数据库中呢
请一步步讲清楚
谢谢
它说:"with"要设定
怎么设定呢?

dim conn as adodb.connnection '定义
dim rs as adodb.recordset
cnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb" '数据库连接方法
conn.open cnstr '打开数据库连接
sql="select * from 表" 'SQL语句
rs.open sql,conn,1,3 '打开记录集
rs.addnew '增加个空记录
rs("字段")=text1 '把text1的内容填到空记录中
rs.update '更新记录
rs.close '关闭记录集

-----------------------------
Dim conn As New ADODB.Connection '定义
Dim rs As New ADODB.Recordset

定义这里改成这样