怎样用VB对access数据库 进行 数据 添加

想做一个商品信息查询添加系统 使用的access 控件 连接的ADO
其中表名 叫 商品信息表.mdb 里面有个 酒水信息 表 并且已经连接 且 可以使用DataGrid 显示表中的信息了 现在想做一个 添加功能 当点击添加按钮后 进入一个子界面
可以 添加一些数据 如:商品编号 商品名称 商品价格 等 怎么实现这个操作 代码怎么写 ??

两种办法,一种是 用SQL,另一种是ADO
1、用SQL添加数据:
insert into 表名(字段1,字段2,字段3)
values(值01,值02,值03)
例如:
docmd.runsql"insert into EmpTable(Name,age,Duty,Salary) values('王明',35,'外贸总监',12500)"
2、用ADO的办法:
ADO比较复杂,给你一个完整的例子吧:

Dim strSqlfitjc As String
strSqlfitjc = "select * from *表"
Set RSfitjc = New ADODB.Recordset ‘定义一个ADO连接,连进数据库
RSfitjc.Open strSqlfitjc, cn, adOpenKeyset, adLockOptimistic ’打开连接
RSfitjc.addnew '添加一个纪录
RSfitjc.Fields("配件编号") = “style” ‘给每个字段赋值
.Update ’储存赋值的新纪录
.Close 关闭连接
End With
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-10-15
连接好数据库后,就可以查询,添加,修改,删除数据了
添加:
Adodc1.Recordset.AddNew '添加空记录
Adodc1.Recordset.Fields("商品编号") = Text1.Text
Adodc1.Recordset.Fields("商品名称") = Text2.Text
Adodc1.Recordset.Fields("商品价格") = val(Text3.Text)

Adodc1.Recordset.Update '保存数据本回答被提问者采纳

VB编程如何实现ACCESS数据库记录的查询?
一、查询数据库记录 要查询数据库中的记录,首先需要创建一个连接对象,并使用其执行SQL查询语句。具体步骤如下:创建ADO连接对象并建立与数据库的连接。 创建一个命令对象,并设置其类型为“查询”。 在命令对象中编写SQL查询语句,例如:`"SELECT * FROM Students WHERE Age = '99'"`。 ...

怎样通过VB程序联接ACCESE数据库
要通过VB程序联接Access数据库,可以使用ADO(ActiveX Data Objects)或Data控件。首先,利用ADO或Data控件建立与Access数据库的连接。随后,通过ADO或Data控件将Access中的数据绑定到程序中相应的位置。ADO,即ActiveX Data Objects,是Microsoft提供的一种数据库访问组件。通过ADO对象,可以执行SQL查询、更新数...

VB2010怎么向ACCESS2007数据库添加数据啊
1)ADODC属性页→通用→选择使用连接字符串→点击生成→选择Microsoft Jet 4.0 OLE DB Provider 点击下一步→选择之前准备好的数据库→点击测试连接,显示测试成功则ok,确定。2)ADODC属性页→记录源→命令类型选择2-adcmdtable,表或存储过程名称选择之前建立的数据表test,点击确定,ADODC属性设置完成。7....

VB实现ACCESS数据库记录的查询,新增,删除,修改的代码是什么?
“修改”按钮的程序 \\x0d\\x0aPrivate Sub cmdEdit_Click() \\x0d\\x0asql = "select * from 停时统计 where date = cdate('" & Text8.Text & "') and ycqk = '" & Combo1.Text & "'and id = '" & DataGrid1.Columns(2).CellText(DataGrid1.Bookmark) & "'" \\x0d\\x0a...

vb中如何调用Access数据表中的某一个记?
在VB6.0中调用Access数据表中的某个记录,可借助ADO控件实现。具体操作如下:1. 首先,确保在项目中添加ADO控件。在“工程”菜单下的“部件…”选项中,选择并添加Microsoft ActiveX Data Objects 2.5 到工具箱。2. 将ADO控件拖至窗体,然后在代码编辑器中编写代码,通过ADO对象连接Access数据库。例如...

利用VB对Access数据库增加新字段
首先打开数据源,然后使用alter table语句即可,具体范例如下:Set cn = New ADODB.ConnectionSet rs = New ADODB.Recordsetconstr = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & 数据库路径及文件名 & ""cn.Open constrDim str As Stringstr = "alter table 表名 add 字段 类型"rs.Open...

VB如何向access数据库中添加一条记录
vb向access插入数据:Public Conn As New ADODB.Connection Public HidErr As Boolean Public RS As New ADODB.Recordset Public comm As New ADODB.Command '打开ACCESS数据库,可设定登陆的密码 Function OpenAccess(Mdbfilepath As String, Optional Mdbpassword As String, Optional usemdw As Boolean)...

如何在VB中对access数据库新增列
1楼为修改列值,错误。增加或删除列得用以下语句:ALTER TABLE table_name ADD column_name datatype ALTER TABLE table_name DROP COLUMN column_name

VB如何用ADO向ACCESS数据库插入和修改记录?
1、Microsoft Access窗口中,选择文件菜单中的打开选项,打开一个已有的数据库。2、数据库中有两张表格,如下图所示。3、数据库中,表格学生信息是课程成绩的子表。4、如果直接在子表中插入记录,会提示不能添加或修改。5、其实,只需在主表中,插入相关的主键和记录。6、接着,就可以在子表中插入...

VB如何用ADO向ACCESS数据库插入和修改记录?
1、Microsoft Access窗口中,选择文件菜单中的打开选项,打开一个已有的数据库。2、数据库中有两张表格,如下图所示。3、数据库中,表格学生信息是课程成绩的子表。4、如果直接在子表中插入记录,会提示不能添加或修改。5、其实,只需在主表中,插入相关的主键和记录。6、接着,就可以在子表中插入...

相似回答