VB建壳指定工作组启动ACCESS详解.docVIP

VB建壳指定工作组启动MDB项目详解 一、前言 1.1 用VB加Access进行项目开发之初衷 Access因操作简便、直观，以及强大的功能，而得到许多数据库开发者的推崇，不过 Access 也有一定的局限性，如：Access开发平台开发的项目，无法完全编译并脱离Access系统环境；宏的安全级别限制有时让我们项目不能顺利启动，在分发项目时，需要我们手动对Access逐一手动设置等。 为弥补 Access 某些不尽如人意的地方，我尝试着用 VB与 Access 结合，用以自动完成Access系统环境设置，如：修改宏安全级别避开限制启动MDB项目，或指定工作组启动 MDB 项目等。 1.2 配置要求： 本文ACCESS为2003版本（其它版本大家可自行测试）； 本文以office提供的ADDRBOOK.mdb数据库作为讲解及演示实例 壳通过VB6编译，编译后文件名：指定工作组并启动MDB项目.exe 1.3 本文要点： 如何通过“安全机置向导”保护数据库； 如何实现VB与ACCESS无缝对接； 如何实现VB修改ACCESS宏安全级别限制； 如何实现用shell函数指定工作组启MDB项目 如何实现VB建立壳及如何编译EXE 二、使用 Security Wizard 设置 Access 数据库的安全性 我们通常会通过设置数据库密码、设置模块密码或将mdb文件转换为 mde 文件等方法来保护数据库的安全，以上方法能最大限度保护数据库的安全，但上述方法在网络的多人使用环境中有一定局限性，不能针对不同的用户，提供对于数据库对象不同的访问及管理权限。 解决方案就是建立“工作组”，那什么是“工作组”呢？通俗的说，“工作组”就是将用户按级别编成不同的“组”，并为不同组设定不同数据库访问及管理权限，并将这些设置存放在一个后缀为MDW的文件中，这个文件就是工作文件。只是建立工作组需一系列的操作，如果你不是很明了，会让你无所适从，为此Access为我们提供了友好的“设置安全机置向导”，让你轻松“一点”搞定。 2.1 “安全机制向导”具体操作步骤: 1、打开数据库，点菜单 工具—安全—设置安全机制向导，打开向导。 2、在对话框中单下一步，其中一些默认选项不用做修改，直至下图这一步很关键（见下图），你可选择已有用户，并设定密码，你也可以添加新用户，并为添加用户设定密码，剩下就是点下一步直至最后完成就好了。 完成后，会在mdb文件所在文件夹产生另两个文件（见下图），后缀mdw 的文件为工作组文件，后缀bak 的文件为 mdb 备份文件。你必须记住，用户名：tan 密码：123，这可是我们后面指定工作组打开mdb关键。 三、VB建壳指定工作组启动MDB项目 3.1 了解指定工作组启动MDB项目命令 下面是一段指定工作组启动MDB项目命令实例（见下图），你可以直接将以下命令粘贴到运行对话框运行。 应用程序路径：C:\Program Files\Microsoft Office\OFFICE11\msaccess.exe MDB文件路径：D:\例程\Data\ADDRBOOK.mdb 指定工作组参数：/wrkgrp 工作组文件路径：D:\例程\Data\Security.mdw 工作组用户参数：/user 工作组用户密码参数：/pwd 3.2 指定工作组启动MDB需要解决的几个问题： 实现VB与ACCESS 的无缝对接。实现对接需要VB工程中引用ACCESS11.0 类库，文件名 MSACC.OLB ，引用方法：在VB工程窗口，点击菜单：工程—引用—钩选 Micfrosoft ACCESS 11.0 Object library—点确定，完成类库引用。这样我们就能如在VBA编辑环境一样对ACCESS对象进行编程，调用ACCESS类对象属性、事件、方法。 实例代码： 修改ACCESS宏安全级别自定义函数，确保mdb项目顺利启动。有关于此的方法我在论坛有发贴，在此不着笔墨。 实例代码： 指定工作组启动MDB项目自定义函数。这一节关键点在于用代码获取msaccess.exe 文件所在路径，换句话说就是必须得到office的安装路径。方法有二：一是SysCmd方法，二是通过注册表指定键值获取，本文采用的是第一种方法。以上二法代码实例，我在论坛中已有发贴，在此不做细说。下面是指定工作组启动MDB项目代码。 调用以上两个自定义函数，建立指定工作组启动项目过程。 实例代码： 3.3最终完成建壳，并编译为EXE 启动VB