VB如何使用ADO修改ACCESS数据
1、Microsoft Access窗口中，选择文件菜单中的打开选项，打开一个已有的数据库。
2、数据库中有两张表格，如下图所示。
3、数据库中，表格学生信息是课程成绩的子表。
4、如果直接在子表中插入记录，会提示不能添加或修改。
5、其实，只需在主表中，插入相关的主键和记录。
6、接着，就可以在子表中插入相关记录了。
7、如果要在子表中插入字段，只需选择单击以添加选项。
8、新增字段后，输入字段名即可。
试编写代码如下：
Private Sub Command1_Click() Dim db As New ADODB.Connection Dim RS As New ADODB.Recordset Dim sql As String 'SQL字符串 db.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data source =D:\Projectsemp\data.mdb" '数据库连接 db.Open '打开数据库 sql = "UPDATE [user] SET Sl=Sl-" & Text1.Text & " WHERE Xm='张三';" RS.Open sql, db, 1, 3 Set db = Nothing Set RS = NothingEnd Sub
运行截图：
Public stuRs As ADODB.Recordset '定义Recordset对象
Public SqlFindStr As String
Public Function Conn2DB() As Boolean
'公共Access数据库连函数
Dim connStr As String
Dim dbName As String
dbName = App.Path & "\" & "StudentDB.mdb" '返回程序所在路径
' Access连接字符串
conStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbName
Set dbConn = New ADODB.Connection '定义一个ADODB连接对象
If dbConn.State <> adStateOpen Then '判断ADODB连接是否打开
dbConn.Open conStr '如果不是打开状态 就打开连接
End If
Conn2DB = True
End Function
Public Function ExcSQL(ByVal sql As String) As ADODB.Recordset
Dim rst As ADODB.Recordset
'执行一条SQL查询,得到一个记录集
Set rst = New ADODB.Recordset
rst.Open Trim$(sql), dbConn, adOpenKeyset, adLockOptimistic '得到记录
Set ExcSQL = rst
End Function
自己修改下
在excel2010 VBA找不到预定义的Ado对象
1楼的根本就不懂， 在网上复制过来的 有2中方法 方法1： 在VBE 窗口 工具---引用 MICROSOFT ACTIVEX DATA OBJECTS 6.1 然后定义 变量类型 Dim Stm As New ADODB.Stream 你的程序的定义 也写错了 法法2：创建对象 这个无需添加引用 Set stm = CreateObject("Adodb.Stream")...
易语言超级列表框用ADO方法连数据库怎么那么麻烦?
当前最新版本是MDAC_TYP2.8，其中包括了ADO，如果需要，可到微软网站上下载（下载参考地址：http:\/\/www.microsoft.com\/downloads\/details.aspx?displaylang=zh-cn&FamilyID=6c050fe3-c795-4b7d-b037-185d0506396c）。连接SQLServer 方法 操作系统支持：Windows 所属对象：数据库连接 连接SQL ...
delphi中adoquery的使用(delphi高手详细说一下)
用一个Query即可. 在窗体设置的时候不要将Active设置成true. 所有的代码都自己写,自己控制.一:Query.sql.text:='select count(*) from table1';Query.open; \/\/ open 就相当于Active:=true;Edit1.Text:=Query.fields[0].AsString;Query.close; \/\/查询完后关闭数据集,相当于 Active:=false;二...
什么是并发冲突以及如何在ADO.NET中处理它
你问的应该是数据库并发吧。数据库事务并发带来的问题 数据库事务并发带来的问题有：更新丢失、脏读、不可重复读、幻象读。假设张三办了一张招商银行卡，余额100元，分别说明上述情况。1、更新丢失：一个事务的更新覆盖了另一个事务的更新。事务A：向银行卡存钱100元。事务B：向银行卡存钱200元。A和B...
VB 利用ADO控件,怎么向数据库中添加记录
草那马哪个管理拒绝的？给我滚出来。以后你犯贱一次，骂你10次。http:\/\/zhidao.baidu.com\/question\/1639436044076779260.html 更改前：回答描述不清晰，建议根据提问有重点的介绍相关性强的内容 请根据提问者说提问的问题进行详细的有关的解答!更改后：回答含有违规内容，请删除回答中的违规内容（如：黄反...
用VB 实现(B+C)\/S结构的开发
所谓的B\/S或者C\/S架构是指数据库连接应用,从字面意思可以看出:B就是浏览器的缩写,S是Server的缩写.C是Client的缩写,一般B\/S是针对网页的,C\/S是针对WinForm应用程序的.就是一个连接数据库的 程序.你用的是VB6.0还是VB.net一定要搞清楚了,VB6.0以一儿歌ADO控件做个例子:Private Function 连接数据...
b\/s,c\/s区别,ado与ado.net区别,winform界面设计,以及管理系统相关问题...
2、在.net中，连接数据库最好用ado.net，ado也可以，但是既然有好用的版本，为什么不用呢？怎么连接数据库，随便找个例子，几行代码，就是那样连 3、界面的问题，这个在bs下也很简单，几个超级链接，加点css就可以了 4、cs开发与bs开发，区别不是一般大，cs只要熟悉C#就够了 bs要了解html、css、...
请帮我用vb6.0 编写个小软件,谢谢。
实例我已发 Dim adocn As New ADODB.Connection Dim a(), b(), c()Dim n As Integer Private Sub Command1_Click()If Text1.Text = "" Then Else Dim rs As New ADODB.Recordset Dim strSql As String strSql = "select * from ss where 编码=" & Trim(Text1.Text)adocn.Open rs...
Delphi使用Adoquery插入数据库的问题
很明显你插入了 主键相同的数据 , 你可以调试一下看看 adoquery1.sql.text 没次插入的数据是啥, 就知道是哪里的问题了
在ADO.NET中,要执行一条添加数据SQL命令,必须创建对象是___。_百度...
⑤DataAdapter类某些时候开发人员使用数据主要是只读，并且开发人员很少需要将其改变至底层数据源。这些情况要求在内存中缓存数据，以此来减少并不改变数据被数据库调用次数。DataAdapter通过断开模型来帮助开发人员方便完成对以上情况处理。使用ADO.NET进行数据添加时，必须要用到类是Connection和Command。
犹隶凯速： 新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件.然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连...
通河县17849242434： VB如何用ADO向ACCESS数据库插入和修改记录? - ？
犹隶凯速： 添加:'下面这句连接数据库指定表的所有字段Adodc1.RecordSource = ＂select * from 库存表＂'下面这句添加记录Adodc1.Recordset.AddNew下面4句就是通过4个TEXTBOX控件输入字段的数据,如果是数字类型可以加VALAdodc1....
通河县17849242434： 在VB中如何使用ADO动态的连接Access数据库 - ？
犹隶凯速： 如果上述方法仍读不到数据时请注意:ACCESS数据库可能有默认数据表,记得没错的话,User名称为系统默认表,之前我也使用此名称作为自己的数据表名称,但一直读不到数据,改一个名就行了,程序代码并没变.所以认为系统有默认表.
通河县17849242434： VB6如何使用ADO对象操作access数据库?添加、修改、删除. - ？
犹隶凯速： 用Listview就可以 另外数据库连接要放到模块中.Hi我,给你实例,另祝新年快乐!
通河县17849242434： vb 修改使用中的access数据库 - ？
犹隶凯速： VB6可以使用数据访问API——“ADO”连接局域网中的Access数据库,然后用SQL语言读写数据库.下面是VB操纵网络中ACCESS数据库示范代码,供参考 请注意与MSSQL、MySQL等大中型数据库不同,网络中的ACCESS数据库必须存...
通河县17849242434： 你好 vb中的ado怎么写才和access连接 - ？
犹隶凯速： 第一种方法:设置adodc1的属以连接数据库.在adodc1控件上右键--Adodc属性--使用连接字符串--生成--Microsoft Jet 4.0 OLE DB Provider--下一步--选择或输入数据库名称---找到要连接的数据库后,确定.然后记录源设置属性. 如果要把内容提交到...
通河县17849242434： 怎么用VB调用access数据库 - ？
犹隶凯速： 首先,我们需要引用ADO.具体的方法是,在＂工程＂ -- ＂引用＂ 中,找到＂Microsoft ActiveX Data Object *.* Library＂,这里的＂*.*＂是指的时ADO的版本号,一般来说,应用程序或ActiveX控件都具有向下兼容性,所以我们尽可能选择比较新...
通河县17849242434： vb中用ado对access的更新 - ？
犹隶凯速： Private Sub Command4_Click() Set conn = New ADODB.Connection sql = ＂Provider=Microsoft.Jet.OLEDB.4.0;Data Source= ＂ & App.Path & ＂\数据库.mdb＂ conn.Open sql Set rs = conn.Execute(＂select * from 玻璃容器重＂) rs.AddNew '----...
通河县17849242434： vb修改access数据 - ？
犹隶凯速： VB6新建工程,添加登录对话框,修改其代码,用ADO数据控件连接ACCESS数据库,将txtPassword文本控件的DataSource属性写为ADODC1,属性DataField写为数据表的密码字段名,并将Adodc1的属性ConnectionString中的数据库路径改...
通河县17849242434： vb6的ado编写简单的access数据库编程？
犹隶凯速： '在工程里引用 microsoft activex data objects 2.7 library '然后随便画个命令控件,在命令控件的单击事件里(click)输入以下代码 '以下是查询记录的代码: Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Set cn = New ADODB....
