㈠ VB如何用ADO向ACCESS数据库插入和修改记录
1、Microsoft Access窗口中,选择文件菜单中的打开选项,打开一个已有的数据库。
㈡ VB往ACCESS中写入数据
最好采用ADO方法,通用性强、效率高 首先在工程中引用Microsoft AXXXX Data Objects 2.6 Library,然后配合SQL语句。 (AXXXX为控件的那一个,我写全称系统提示我的回答含有广告,不让发) 1、声明: Private conn As ADODB.Connection (连接数据库的ADO的Connecet 对象) Private Public strconn as string (连接字符串) Dim strSQLcmd AS String (SQL命令字符串) 2、赋值 strconn= "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" + App.Path + "\XX.mdb; " SQL语句分两种情况: (1)、{更新数据,即替换原来的数据)} strSQLcmd=strSqlCmd = "Update 表名 Set 字段名 =字段值& " Where 更新条件" (2)、{插入新记录,字段列表和字段值列表要一一对应,并用逗号分隔} strSqlCmd = "INSERT INTO 表名 (字段列表) Values 字段值列表" 3、执行SQL语句 Set rs.ActiveConnection = conn rs.CursorType = adOpenDynamic rs.LockType = adLockOptimistic rs.Open strSqlCmd
㈢ VB中如何导入ACCESS数据
VB6.0中通过使用ADO数据对象或使用ADO Data 控件来关联ACCESS的MDB数据库和SQL结构化查询语言来导入数据。
ADO Data 控件, ADO Data 控件使用 Microsoft ActiveX 数据对象(ADO)
来快速建立数据绑定的控件和数据提供者之间的连接。数据绑定控件是任何具有“数据源”属性的控件。数据提供者可以是任何符合 OLEDB 规范的数据源。使用
Visual Basic 的类模块也可以很方便地创建子集的数据提供者。
尽管可以在应用程序中直接使用 ActiveX 数据对象(ADO),但 ADO Data 控件有作为一个图形控件的优势(具有“向前”和“向后”按钮),以及一个易于使用的界面,使您可以用最少的代码创建数据库应用程序。
ADO 是为 Microsoft最新和最强大的数据访问范例 OLE DB 而设计的,是一个便于使用的应用程序层接口。OLE DB为任何数据源提供了高性能的访问,这些数据源包括关系和非关系数据库、电子邮件和文件系统、文本和图形、自定义业务对象等等。ADO 在关键的 Internet方案中使用最少的网络流量,并且在前端和数据源之间使用最少的层数,所有这些都是为了提供轻量、高性能的接口。之所以称为 ADO,是用了一个比较熟悉的暗喻,OLE自动化接口。同时 ADO 使用了与 DAO和 RDO相似的约定和特性,简化的语义使它更易于学习。
结构化查询语言(Structured Query Language)简称SQL,是一种特殊目的的编程语言,是一种数据库查询和程序设计语言,用于存取数据以及查询、更新和管理关系数据库系统;同时也是数据库脚本文件的扩展名。
应用代码示例:
ADO:
Private Sub Command1_Click()
Dim cn As New ADODB.Connection '定义数据库的连接
Dim rs As New ADODB.Recordset
Dim sql As String
sql = "select * from jishijilu"
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "wd.mdb;Persist Security Info=False"
cn.Open
rs.CursorLocation = adUseClient
rs.Open sql, cn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs
End Sub
ADO Data控件:
Private Sub Command2_Click()
sql = "select * from jishijilu"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "wd.mdb;Persist Security Info=False"
Adodc1.RecordSource = sql
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
End Sub
㈣ 如何在VB中实现向ACCESS数据库添加数据
以下代码能使用的前提是库引用、和数据库连接代码正确:
两种办法,一种是 用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
㈤ VB6.0如何将数据写入Access数据库
连接字符串:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;Jet OLEDB:Database Password=MyDbPassword;
㈥ VB 如何往 ACCESS数据库理添加数据
一,准备工作:
1,建立新工程,保存到文件夹。
2,把ACCESS数据库文件复制到上述文件夹。
3,在窗体上,添加一个ADODC控件和一个按钮。
4,在按钮的单击事件里编写程序。
程序代码如下:
'连接数据库的三步曲:
Adodc1.ConnectionString
=
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source="
&
App.Path
&
"\数据库.mdb;Persist
Security
Info=False"
Adodc1.RecordSource
=
"数据表名"
Adodc1.Refresh
‘添加记录
Adodc1.Recordset.AddNew
'添加新的空纪录
Adodc1.Recordset("姓名").Value
=
Text1.Text
Adodc1.Recordset.Update
’更新到数据表
㈦ 你好,请问下vb里面怎么把采集到的数据写入ACCESS数据库
建立数据库
使用odbc连接
然后:
rst.Open "SELECT * FROM 你的表 where 条件", Cnn1, adOpenDynamic,adLockOptimistic
rst.AddNew
rst!字段 = 你的数据
rst.Update