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

本文介绍一种利用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：输入安装程序标题，然后单击下一步，再单击下一步，再单击下一步，再单击下一步，单击完成。 具体可参考本例中的安装包 Manufacturing transformation and development planning1 comprehensive strength of the manufacturing industry to upgradeRelying on good traffic conditions and location advantages of the industrial base, the manufacturing industry comprehensive strength steadily, the total size of the total, technical level, economic benefits and so on in the country has become the cornerstone of the precedent, the citys economic and social development and an important support. 12th Five-Year period, the total industrial added value, the average annual growth rate of dada%, the amount of the total amount of investment of the citys industrial enterprises with an average annual growth rate%, above scale industrial enterprises realized a total profit of the average annual growth rate of%.xx years, the citys above scale industrial output mode billion yuan output value of over 80 billion yuan of industrial dada to 8, above scale industrial added value billion yuan, industrial growth. Added value accounted for GDDP%, the resident population per capita GDP reached million, ranked second in XXX Province, the national large and medium-sized cities in the forefront.2 continuous optimization of industrial structureThe be