Access中以指定工作组文件启动MDB文件

2016-02-19 19:06 37 1 收藏

图老师小编精心整理的Access中以指定工作组文件启动MDB文件希望大家喜欢,觉得好的亲们记得收藏起来哦!您的支持就是小编更新的动力~

【 tulaoshi.com - 编程语言 】

     程序完成交给用户后,要求每次启动时均用指定的工作组文件,途径大致如下几种:

  1。用快捷方式,在其中加上启动参数指定工作组文件;

  2。用ACCESS内置工作组管理员指定工作组。

  3。也可以直接修改注册表。

  4。用VB之类的东东做个外壳启动带参数启动ACCESS。

  第一种方式用户在使用中容易造成丢失。

  第二第三种其实是一样的,但设置后用户在本机操作所有的数据库都要求登陆。

  敝人推荐用第四种

  其实用ACCESS本身也可以做个外壳,达到同样效果:

  Set fs = Application.FileSearch ''查找文件
With fs
   .LookIn = "C:Program FilesMicrosoft Office" ''查找路径
   .SearchSubFolders = True ''包含子文件夹
   .FileName = "msaccess.exe" ''查找字串
   
   If .Execute() 0 Then
    p = .FoundFiles(1)  ''ACCESS主程序完整路径
    Shell p & " " & CurrentProject.Path & "123.mdb /wrkgrp " & CurrentProject.Path & "system.mdw", 3  ''带参数启动程序
   Else
    MsgBox "C:Program FilesMicrosoft Office 下没找到MSACCESS的程序文件,系统无法运行."
   End If
End With
docmd.quit  ''退出外壳

  将外壳做成MDE交付用户便万事大吉啦。

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

  带参数启动程序语句可更改为以下代码

  Shell SysCmd(acSysCmdAccessDir) & " msaccess.exe" & CurrentProject.Path & "123.mdb /wrkgrp " & CurrentProject.Path & "system.mdw", 3

  注意,如果要将密码和用户名写在mde中,请先加密,否则用写字板就可看见密码及用户名

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

来源:http://www.tulaoshi.com/n/20160219/1620013.html

延伸阅读
下面是修改工作组用户密码的函数,调用时如果用于密码为空,请使用"",不要使用null,两者不同。:) Function CheckUserPasswordInGroup(UserName As String,_ oldPassword As String, newPassword As String) As Boolean On Error GoTo ChkErr Dim wk As DAO.Workspace, Ur As DAO.User, i As Integer, Found As Boo...
适用 Access2000及以后版本 翻译:tmtony(Access/Office中国) 首先在公共模块添加如下函数: Public Function AutoCompactCurrentProject()     Dim fs, f, s, filespec     Dim strProjectPath As String, strProjectName As String     strProjectPath = Application.CurrentProject.Path &...
当 MDB 文件加了密码,直接由 Access 打印MDB文件时,会出现密码对话框,询问密码。但是若要由 VB 程序中打印,必須更改 VB 程序中打开MDB文件的指令,否则会出现错误信息!以下针对各种情况,分別加以说明: 1、 使用 DAO 命令打开MDB文件:OpenDatabase 若要由程序中打开,命令如下: Set DB = OpenDatabase(DatabaseName, False, False...
标签: 电脑入门
开启的服务 右键点击我的电脑或计算机管理----服务和应用程序,打开服务或者用WIN+R打开运行---输入services.msc回车,打开服务设置 将以下服务的[启动类型]选为[自动],并确保[服务状态]为[已启动] Server Workstation Computer Browser DHCP Client Remote Procedure Call Remote Procedure Call (RPC) Locator DNS Client Functio...
以文字方式保存文件名的图片如何在报表中预览? 问题: 报表中如何预览图片? 数据库表中存放着下面几个字段,学号,姓名,性别,图片路径,如下:1002003001,张三,男,10020031002003001.jpg。现在做报表,想把图片显示出来,因为图片路径为字符类型,所以显示出来的是10020031002003001.jpg,怎样做能把图片显示出来?图片就在数据库所...

经验教程

783

收藏

13
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部