百度知道 - 信息提示
ACCESS数据库VB向Access添加数据的步骤是什么?
楼主的这个程序是写入记事本的..如果想将数据写入到ACCESS数据库..
首先要引用数据库连接驱动
在"工程"--"引用",勾选"microsoft activex date objects 2.8 library"
然后在窗口代码框中加入如下代码:
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql$
Function openconn()
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & App.Path & "\数据1.mdb" '此处为数据库相对路径
End Function
Function closeconn()
conn.Close
End Function
Private Sub Command1_Click()
Call openconn
rs.Open "select * from [表1]", conn, 1, 3
rs.AddNew
rs("姓名") = text1.Text
rs("分数") = text2.Text
rs.Update
rs.Close
Call closeconn
MsgBox "添加数据成功!"
End Sub
这样可以么?
VB如何用ADO向ACCESS数据库插入和修改记录?
1、Microsoft Access窗口中,选择文件菜单中的打开选项,打开一个已有的数据库。
2、数据库中有两张表格,如下图所示。
3、数据库中,表格学生信息是课程成绩的子表。
4、如果直接在子表中插入记录,会提示不能添加或修改。
5、其实,只需在主表中,插入相关的主键和记录。
6、接着,就可以在子表中插入相关记录了。
7、如果要在子表中插入字段,只需选择单击以添加选项。
8、新增字段后,输入字段名即可。