利用VB6对Access数据库进行打包..doc

本文介绍一种利用VB6.0对Access数据库进行打包的方法，供网友参考。 步骤1： 进入VB6.0，创建一个标准EXE工程 步骤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：输入安装程序标题，然后单击下一步，再单击下一步，再单击下一步，再单击下一步，单击完成。 具体可参考本例中的安装包