利用VB6.0对access数据库进行打包的方法

来源:www.accessoft.com 点击数:15947 　 | 收藏 | 复制

时　间:2010-09-03 17:52:38
作　者:wqm099 ID：5203 城市：郑州
摘　要:本文介绍一种利用VB6.0对Access数据库进行打包的方法，供网友参考。
正　文:

本文介绍一种利用VB6.0对Access数据库进行打包的方法，供网友参考。
步骤1：
进入VB6.0，创建一个标准EXE工程

步骤2：创建引用

步骤3：引用Microsoft Access 11.0 Object Library

步骤4：窗体的加载事件中加入如下代码
Private Sub Form_Load()
Dim path As String
path = App.path & "\办公自动化系统.mdb"                        '数据库文件的路径
Dim new_db                                                '用于创建文件
Set new_db = CreateObject("access.application")           '创建一个新的ACCESS文件
new_db.OpenCurrentDatabase path, False                    '打开ACCESS数据库文件
End                                                       '关闭VB系统
End Sub

步骤5：保存工程
步骤6：生成EXE文件
步骤7：关闭VB6.0
步骤8：打开VB6.0的打包工具

步骤9：选择要打包工程，单击游览按钮查找你的工程文件

步骤10：打包，单击打包

步骤11：选择标准安装包，单击下一步

步骤12：选择生成包的路径，然后单击下一步

步骤13：添加所需的文件，这一步非常重要，一定要把数据库加上，单击添加按钮加入

步骤14：选单个压缩文件，单击下一步
步骤15：输入安装程序标题，然后单击下一步，再单击下一步，再单击下一步，再单击下一步，单击完成。

具体可参考本例中的安装包及附件中的Word文档。