如何使用ADODB.connection实现与本地Access数据库的连接？

VB > VB基础类
收藏 回复
[问题点数：10分，结帖人heartpartee]
更多帖子
私信 空间 博客
heartpartee
等级
本版专家分：99
结帖率 100%
如何使用ADODB.connection实现与本地Access数据库的连接？
我是这样写的：
With DB_Conn
    .ConnectionString = "data source=fis"
    .CursorLocation = adUseClient
    .ConnectionTimeout = 60
    .CommandTimeout = 120
    .Open
End With
好像不行！
求教各位大侠！
只看楼主 引用 举报 楼主 收起
展开阅读全文
更多帖子
私信 空间 博客
cnlyh
等级
本版专家分：68
.ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=fis.mdb;Persist Security Info=False"
只看TA 引用 举报 #1得分 2
更多帖子
私信 空间 博客
heartpartee
等级
本版专家分：99
有错误，但是err.descrpition中显示不出来！

求教
只看TA 引用 举报 #2得分 0
更多帖子
私信 空间 博客
daisy8675
等级
本版专家分：60198
勋章
Blank
微软MVP 2009年7月 荣获微软MVP称号
2005年7月 荣获微软MVP称号
2008年7月 荣获微软MVP称号
2007年7月 荣获微软MVP称号
2006年7月 荣获微软MVP称号
Blank
红花 2005年8月 VB大版内专家分月排行榜第一
2005年3月 VB大版内专家分月排行榜第一
Blank
黄花 2005年7月 VB大版内专家分月排行榜第二
Blank
蓝花 2005年6月 VB大版内专家分月排行榜第三
2005年4月 VB大版内专家分月排行榜第三
2004年4月 VB大版内专家分月排行榜第三
Option Explicit

Private Rs As New ADODB.Recordset
Private Conn As New ADODB.Connection

Private Sub Form_Load()
 Dim strConn As String
 
 ' 连接数据库的字符串
 ' 连接带密码的数据库,直接在连接符后面加上Jet OLEDB:DataBase Password='您的密码'
 ' 连接Access97数据库需要使用Jet.OLEDB.3.5,Access2K和以上数据库使用Jet.OLEDB.4.0
 strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"
 
 ' 使用客户端数据游标
 Conn.CursorLocation = adUseClient
 ' 打开Access的连接
 Conn.Open strConn
 
 ' 如果RecordSet的状态不是关闭状态,则关闭Recordset
 If Rs.State <> adStateClosed Then Rs.Close
 
 ' Recordser打开表People
 Rs.Open "Select * from People", Conn, adOpenKeyset, adLockOptimistic
 
 ' 报告出 一共多少笔数据,测试是否存在数据
 ' MsgBox Rs.RecordCount
 
 ' 绑定进DataGrid
 Set DataGrid1.DataSource = Rs
 
End Sub


你的strConn也就是连接字符可以用adodc控件去生成
只看TA 引用 举报 #3得分 5
更多帖子
私信 空间 博客
daisy8675
等级
本版专家分：60198
勋章
Blank
微软MVP 2009年7月 荣获微软MVP称号
2005年7月 荣获微软MVP称号
2008年7月 荣获微软MVP称号
2007年7月 荣获微软MVP称号
2006年7月 荣获微软MVP称号
Blank
红花 2005年8月 VB大版内专家分月排行榜第一
2005年3月 VB大版内专家分月排行榜第一
Blank
黄花 2005年7月 VB大版内专家分月排行榜第二
Blank
蓝花 2005年6月 VB大版内专家分月排行榜第三
2005年4月 VB大版内专家分月排行榜第三
2004年4月 VB大版内专家分月排行榜第三
With DB_Conn
    .ConnectionString = "data source=fis"  //字符串错误，access是jet连接
    .CursorLocation = adUseClient 
    .ConnectionTimeout = 60   //连接时间，这个一般用语sql
    .CommandTimeout = 120    //命令时间，一般用语sql，本地acess不用考虑这么长的时间
    .Open
End With
只看TA 引用 举报 #4得分 3
更多帖子
私信 空间 博客
heartpartee
等级
本版专家分：99
楼上的说得很对，我以前就是做Oracle的，然后照抄了原来的，佩服阿佩服阿！
只看TA 引用 举报 #5得分 0
更多帖子
私信 空间 博客
zhaojunliang
等级
本版专家分：267
up
只看TA 引用 举报 #6得分 0
收起
收藏 回复
heartpartee

等级：

关注 私信 TA的帖子
vba-access 数据库连接，增，删，改，查

Option ExplicitSub 数据库连接()'告诉电脑，我们要有ado，引用ado'创建连接对象'给对象取名字Dim con As ADODB.Connection '声明对象变量'创建对象变量并赋值Set con = New ADODB.Connection'建立数据库的连接'dim ...

ASP连接各种数据库的方法（大全）

ASP连接Access数据库（DSN-less连接方法）: set adocon=Server.Createobject(“adodb.connection”) adoconn.Open”Driver={Microsoft Access Driver(*.mdb)};DBQ=”&_Server.MapPath(“数据库所在路径”)ASP连接...

ASP连接各种数据库的方法

ASP连接Access数据库（DSN-less连接方法）: set adocon=Server.Createobject(“adodb.connection”) adoconn.Open”Driver={Microsoft Access Driver(*.mdb)};DBQ=”&amp;_Server.MapPath(“数据库所在路径”) ...

ADODB.Connection对象的Execute方法

通常 应该这样用conn.execute(sql) ,conn也就是一个ADODB.Connection对象的实例。 ADO是Active Data Object的缩写，称为ActiveX数据对象。利用ADO对象，通过ODBC驱动程序或OLE DB连接字符串，可实现对任意数据库的...

asp连接access数据库代码（包含.mdb和.accdb两种格式）

现在的access数据库有2种后缀格式：.mdb和.accdb，区别是.mdb是access2003版及以前，.accdb是2007版access的格式。因为版本不一样，所以连接代码会有一些区别，我们来分别看一下！.mdb格式&lt;% dim conn,...

ADODB.Connection 错误 '800a0e7a' 未找到提供程序。该程序可能未正确安装。解决办法集锦

ADODB.Connection 错误 '800a0e7a' 未找到提供程序。该程序可能未正确安装。 /hua1/manage/inc/conn.asp，行 8 咋一看貌似是数据库连接的问题，但是我反复看了数据库的连接代码没有错误；接下来就换到自己的机器上...

asp各种数据库连接语句大全

MS Access数据库连接用DSN连接并且没有用户名和密码：set conn = Server.CreateObject("ADODB.Connection")conn.open "YourDSNName"%>用DSN连接并且有用户名和密码：set conn = Server.CreateObject("ADODB....

ADO,OLEDB,ODBC,DAO的区别

ODBC（Open Database Connectivity，开放数据库互连）1992年，微软公司开放服务结构(WOSA,Windows Open Services Architecture)中有关数据库的一个组成部分，它建立了一组规范，并提供了一组对数据库访问的标准API...

IIS8/IIS7/IIS6 出现ADODB.Connection 错误 '800a0e7a'的解决办法

　在XP32位下用VS2005发布两个网站： A、基于于SQL2000 B、基于Office Access 　在服务器配置完毕后，A站正常运行，很...B站报错，意思于法连接到数据库，郁闷很久。 　思考：今天网友提示64位IIS对Ole的支持问题。

Excel VBA读取 ACCESS 数据 连接

Excel VBA读取 ACCESS 数据 连接 Sub access_test() Dim CONN As Object Dim RST As Object Dim SQL As String Sheets(&quot;Sheet1&quot;).Cells.Clear Set CONN = CreateObject(&quot;adodb....

网页连接各种数据库方法大全

先收藏起来,以备后用~~~~~~~~ 网页连接各种数据库方法大全 ASP语言的话，方法如下：1.Access数据库的DSN-less连接方法:set adocon=Server.Createobject("adodb.connection")adoconn.Open"Driv

vb 与 .accdb 格式的access数据库的连接方法

在用vb连接access数据库时，出现了这样的错误： 这是你的数据库格式不被 程序识别。vb默认的一般是.,mdb access数据库格式！这时我们看一下我们要连接的 是.accdb 格式的。 看一下代码，我们以前使用的是： ...

用VBA把EXCEL表导入ACCESS数据库中

首先在指定的access数据库的建立一张表，表格的字段和需要导入EXCEL表的字段保持一致。  方法一：在eccel VBA编辑器... '定义ADODB 连接Access数据库  Dim Cnn As New ADODB.Connection  Dim Rs As New ADODB

Python连接Access和读取Access数据库的例子

其实也可以直接找access的库直接连，下文是调用windows的adodb对象来连接，也可以...其实这个Python连接Access和读取Access数据库的例子是写给自己看的，网上已经有Python读取Access的例子了，我这个也是参考以上制作的

asp与ACCESS数据库的连接及基本操作

①数据库连接的建立： Ⅰ、没有密码的数据 < % set cn=server.createobject("adodb.connection") *建立connecton对象,定义了一个adodb数据库连接组件 cn.open"provider=microsoft.jet.oledb.4.0;data source="&...

ASP与SQL数据库连接代码

ASP与SQL数据库连接代码//第一种写法：MM_conn_STRING = "Driver={SQLServer};server=(local);uid=sa;pwd=;database=infs;"Set conn = Server.Createobject("ADODB.Connection")conn.open MM_...

VBA访问access数据库实例

最近，同事要用一个excel文件导出每天邮件的信息，邮件基本信息都存在了access数据表中了，要实现这个功能有好几种方式，例如写一个qty文件，而我直接用了excel自带的VBA功能，写了一个宏，根据输入的日期直接调用，...

”ADODB.Connection 错误 '800a0e7a' 未找到提供程序。该程序可能未正确安装。“的解决方案

运行环境：winserver 2008 出现问题：运行asp网站出现500...ADODB.Connection 错误 '800a0e7a' 经过百度之后得到以下方法。 -------------------------------- 原帖地址http://hi.baidu.com/xibin/item/5ed5

用VB连接MySQL数据库模块（详解）

Option Explicit '需要安装 MySQL 的 ODBC 驱动，官网上有，我的是 Connector ODBC 5.1 '先引用 Microsoft ActiveX Data Objects 6.0 Library...Public conn As ADODB.Connection Public rs As ADODB.Recordset P

用ASP连接读写ACCESS数据库实例（转）

（一） 数据库的选择： 有许多的数据库你可以选择，SQL SERVER、ACCESS(*.mdb)、EXCEL(*.xls)、FOXPRO(*.dbf)甚至普通的文本文件(*.txt)都可以达到存储...对于非服务器级的数据库建议使用ACCESS97。 因为：

PHP通过ADODB操作ACCESS数据库，中文乱码的解决办法

书上写得是按照以下代码完成对ACCESS数据库的操作： require_once 'adodb/adodb.inc.php'; $conn = NewADOConnection ( "access" ); $connstr = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" . realpath ( ...

关于新旧ACCESS数据库连接（MDB,ACCDB）

关于新旧ACCESS数据库连接（MDB,ACCDB）仅仅是连接字符串有区别 Provider=Microsoft.ACE.OLEDB.12.0;Data Source=数据库路径;（ACCDB） Provider = Microsoft.Jet.OleDb.4.0; Data Source = 数据库路径;（MDB） ...

Excel VBA利用ADODB访问数据库使用小结

连接Oracle数据库  Set cnn = CreateObject("ADODB.Connection")  cnn.Open "Provider=msdaora;Data Source=dl580;User Id=emssxjk;Password=emssxjk;"  dl580是tnsnames.ora中配置的服务名。 ▲创建...

JavaScript操作数据库JS操作Access数据库

JavaScript操作数据库JS操作Access数据库，跟其他语言操作差不多，总结了一下习惯代码，仅供参考学习。 现在在F盘有文件abc.mdf，表名为Student，一共2个字段，Id数字类型主键，stuName文本类型，现对该...

vs2010（mfc）连接access数据库进行增加修改删除操作

_ConnectionPtr m_pConnection; if (CoInitialize(NULL)!=0) { //MessageBox(_T("初始化失败！...//连接access数据库 m_pConnection.CreateInstance("ADODB.Connection"); //低版本access //m

vb与access2003数据库连接程序

引用 Microsoft ActiveX Data Objects 2.8 LibraryDim cnn As ADODB.ConnectionDim rs As ADODB.Recordset连接Access数据库 Set cnn = New ADODB.Connection cnn.Provider = "Microsoft.Jet.OLEDB.4.0" Dim

VBA连接Excel数据库

本公众号的一些文章中是使用Access做数据库的，很多操作都是通过SQL实现的，对比传统方式，还是高效了很多 那么如果只有Excel，能否实现Access那样的高效呢？也就是说将Excel作为数据库来操作 示例：Excel作为...

JSP连接数据库的几种方式

1.Access数据库的DSN-less连接方法: set adocon=Server.Createobject("adodb.connection")adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="&Server.MapPath("数据库所在路径") 2.Access OLE DB...

vb连接access excel步骤 excel 导入access

新建vb工程 新建数据库   第二步 引入数据库环境： ms activiteX data OBJECTS 2.8 LIBRARY ms excel 11.0 引入显示控件: 常用的有三个 datagrid：可以直接从表格修改数据库数据 但是不能设置每行的颜色 ...

ASP与SQL数据库连接代码！

ASP与SQL数据库连接代码！//第一种写法：MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"Set conn = Server.Createobject("ADODB.Connection")conn.open MM_conn_STRING...

相关热词 c# 指定打印机名称 c# 在调试窗口输出信息 c# 点对点即时通讯 c#判断数字是否为空 c# 小端 浮点数 c# typeof返回值 c#初始化字符串 c#dataset用法 c#实现凝聚层次聚类 c#最简单线程