网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 大学论文导航 设计下载 最新论文 下载排行 原创论文 论文源代码
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > 其他类别 > 正文

VB两种操作Access数据库方法的比较

来源:http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 14/07/19

网学网其他类别编辑为广大网友搜集整理了:VB两种操作Access数据库方法的比较绩等信息,祝愿广大网友取得需要的信息,参考学习。

  在VB编程中通常要与数据库打交道,对于数据量较小的应用,一般选用Access作为数据库,因为Access数据库比较简单,功能也比较齐全,数据的备份、拷贝都很方便,且程序发布时不需要额外单独安装其它的数据库管理软件。因此,在功能能够满足要求的条件下,Access数据库往往成为一些小型数据库软件的首选。

  关于用VB操作Access库表的方法有多种,一般初学者往往会使用数据控件,许多资料上也大都以此作为操作Access数据库的起点来介绍,因为这个方法使用起来非常简单,但使用数据控件的方法在程序编码上往往不够灵活。现在介绍一下其它两种操作Access数据库的方法。

  第一种:使用数据库对象

  首先,要进行有关数据对象的声明,代码如下。

Dim MyWs As Workspace
Dim MyDB As Database
Dim WordTab As Recordset

  生成工作区,打开数据库,然后再根据需要打开相应的库表。

Set MyWs = DBEngine.CreateWorkspace″″ ″Admin″ ″″ dbUseJet
Set MyDB = MyWs.OpenDatabase数据库名称 False False
Set WordTab = MyDB.OpenRecordset″表名″ dbOpenDynaset

  这种方法的优点是代码比较简单,要求的环境为DAO 2.5/3.51,其中表名可以换成SELECT语句,即根据条件打开所需要的记录集,这种方法可脱离数据控件,可以比较方便灵活地操作数据库表,增加了程序的灵活性。

  提示:经过测试发现,这种方法只能打开Access97库表,对于Access2000库表却无能为力,会弹出库表格式不对的出错提示。另外,对数据环境的要求仍比较多。

  第二种:使用ADODB

  首先,声明一个链接变量,并根据需要声明记录集变量。

Dim LocCnn1 As ADODB.Connection
Dim LocRst1 As ADODB.Recordset


  建立与数据库的链接,如果数据库没有口令,最后一行可以不写(写上也不会错)。



Set LocCnn1 = New ADODB.Connection
LocCnn1.Open ″Provider=Microsoft.Jet.OLEDB.4.0User ID=Admin″ & _
″Data Source=″ & App.Path & ″数据库名称.mdb″& _
″Mode=Share Deny NoneExtended Properties=''''Persist Security Info=False″ & _
″Jet OLEDBDatabase Password=''asp561rbc''″

  这种方法虽然代码长一些,但对数据环境要求低,且结构清晰,所编写的发布程序也大为减小。由于与链接SQL Server等数据库的方法一样,因而大量的操作数据库的代码相同,当数据库需要由Access扩充到一些大型数据库,或由一些大型数据库裁剪出一个简单数据库时,程序的移植会比较方便。

  另外,这种方法对于Access97及Access2000均能很好地支持,兼容性好。对于大量插入、删除、修改等操作,只在Connection层进行即可,既可提高速度又可减少代码。

  如果还要获取具体的记录集内容,则须再根据条件打开具体的库表,代码如下:

Set LocRst1 = New ADODB.Recordset 
LocRst1.CursorType = adOpenKeyset
LocRst1.LockType = adLockOptimistic
LocRst1.Open ″SELECT  FROM 表名″ LocCnn1adCmdText


  提示:一般情况下,建议使用第二种方法。

  • 上一篇资讯: ACCESS外部数据的使用
  • 下一篇资讯: ACCESS集锦
  • 网学推荐

    免费论文

    原创论文

    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号