如何打开Access数据库

来源:百度知道 编辑:UC知道 时间:2024/05/07 12:18:27
请问在VB环境编程中:
如何实现,用DAO对象打开带口令的Access数据库,以便进行读写.
谢谢!
vb6.0
DAO3.6

Visual Basic对Access数据库的集成非常紧密,通常由以下几个部分组成。

  引用DAO类型库

  1、从“工程”菜单中选择“引用”菜单项;

  2、在可引用列表框中选择“Microsoft DAO 3.51 Object Library”项。

  3、最后“确定”即可

  设置DAO数据类型变量

  DAO数据类型变量共分成两种:

  1、Database变量

  对应于Access数据库,通常在模块中被定义为Public全程变量:

  Public AccessDBF As Database

  '定义数据库对象实例AccessDBF

  2、RecordSet变量

  对应于Access数据库中的一个表,可定义为全程变量或局部变量,亦可作为函数参数进行传递:

  Dim thePrintTable As RecordSet

  '定义一个表对象实例thePrintTable

  打开DAO数据类型

  1、打开Access的方法

  通常可设置一个专门的Public函数用来打开一个Access数据库,并且该函数在启动窗体的Private Sub Form_load ( )过程中被调用,函数定义格式如下:

  Public Sub OpenDatabase ( )

  Dim sConeect As String

  SConnect = ";PWD = 8830428; UID = admin "

  '设置打开时的用户名、口令等参数

  Set AccessDBF = Nothing

  '确认关闭对象实例

  Set A