VB6.0基于ADO连接access踩坑之数据库不显示数据

VB6.0连接数据库就可以实现完美的信息软件系统，无论是汇总、查询、添加、删除均可以操作，这对于当前大数据时代，这个应用在当前阶段完全不过时。本篇文章只是单纯解决问题，ADO如何连接数据库，这里不做详细描述，详情大家可以在相关网站，搜索“详细了解VB连接access”等内容，均可以了解到。

先放上一个完整的有效代码，大家按这个代码可以实现数据库的完美连接和数据记录。


Private Sub Command1_Click()
Dim adoN As New ADODB.Connection
strcnn = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\你的数据库名字.mdb" & ";Persist Security Info=False"
adoN.Open strcnn '打开数据库
Dim adoR As New ADODB.Recordset
Set adoR.ActiveConnection = adoN '连接连接对象
adoR.CursorType = adOpenKeyset '设置游标类型
adoR.LockType = adLockOptimistic '设置锁定类型： 开放式 逐条
SQLs = "SELECT * FROM 表格"
adoR.Open (SQLs)  '打开记录
adoR.AddNew '添加
'adoR("ID") = 自动编号
adoR.Fields("表格列名").Value = Trim(Text1.Text)
MsgBox ("数据保存成功")
adoR.Update
adoR.Close
End Sub

重点来了，各位如果有遇到数据库已经连接上，但唯独不显示记录，那么请注意你的代码中是否有adoR.Update，添加上它后，完美实现。

VB6.0基于ADO连接access踩坑之数据库不显示数据相关推荐

VC6.0 通过ado连接access数据库
小实例 http://download.csdn.net/detail/cxq_1993/8985731 ADO连接数据库 1.COM库的初始化我们可以使用AfxOleInit()来初始化COM库, ...
ADO连接Access数据库，Access版本问题
最近做项目需要用到Access数据库,采用ADO连接Access数据库,需要注意的地方如下: 1.程序初始化的时候,需要初始化OLE库 // 初始化 OLE 库 if (!AfxOleInit()) ...
React-Native 踩坑------MIUI12“Text“组件显示异常
React-Native 踩坑------MIUI12"Text"组件显示异常我尽量不打错别字,用词准确,不造成阅读障碍最近发现React-Native的应用在MIUI12上 ...
php显示mysql数据实例_php 连接mysql数据库并显示数据实例转载 aoguren
PHP连接MySQL数据库并显示数据//---------基本设定---------$mysql_server_name = "localhost";//服务器名称:$mysql_ ...
VS2013下MFC通过ADO连接Access数据库
(VS2013+Access2003) 1. 新建一个基于对话框的MFC项目:ADO_Access0306 在stdafx.h头文件末尾添加(网上有说在某个#include后面的添加的,也有说在合适位 ...
VS2019通过ADO连接access数据库（详细）
1.建立数据库,在控制面板->管理工具->数据源中添加数据源. 在系统DSN中点击添加选择 Microsoft Access Driver(*.mdb) 自行对数据源进行命名,并点击选 ...
ADO连接ACCESS数据库
使用ADOX,需要引入ADOX的动态链接库msadox.dll,首先在stdafx.h中加入如下语句: #import "c:/program files/common files/syst ...
Vue2.0项目中使用sass(踩坑之路)
今天用2.0创建项目的时候,使用scss一直不成功,一直报错------ 记录一下,防止下次踩坑 1.安装依赖包 vue的webpack项目中需要安装上node-sass.sass-loader和st ...
阿里云服务器SSH远程连接与踩坑小记
当你拥有了一台云服务器,就得去玩它,要玩它的话,远程连接就太重要啦,这篇文章就主要记录怎么实现远程连接阿里云服务器: 为什么要强调一下是阿里云服务器呢?自己配置的虚拟机一般就直接用户名+密码登录,但是 ...
vue-cli3.0+webpack4中关于svg-sprite-loader踩坑，让svg组件徜徉我的web项目
第一次写文章,今天踩坑过后希望能够记录这样'生动有趣'的踩坑之旅,还是那样,在技术的海洋中,我和大佬就像鱼和水,我没了大佬就凉了,大佬没了我还清净,感谢一路栽培.公司之前的项目都是用vue-cli2. ...

VB6.0基于ADO连接access踩坑之数据库不显示数据

VB6.0基于ADO连接access踩坑之数据库不显示数据相关推荐

最新文章

热门文章