| 网站首页 | 新闻 | 新书 | 专家 | 技巧 | 源码作品 | 工具/资源 | 商城 | 风采 | 留言 | 论坛 | 网址 | 承接 | 
您现在的位置: Access/Office中国 >> 技巧 >> Access >> 数据库系统 >> 文章正文 用户登录 新用户注册
以指定工作组文件启动MDB文件         ★★★★
以指定工作组文件启动MDB文件
作者:zhuyiwen 文章来源:本站原创 点击数: 本日:{$DayHits} 更新时间:2003-12-6 15:19:17

来源:access911.net

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

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

1。用快捷方式,在其中加上启动参数指定工作组文件; 
2。用access内置工作组管理员指定工作组。 
3。也可以直接修改注册表。 
4。用VB之类的东东做个外壳启动带参数启动access。 

第一种方式用户在使用中容易造成丢失。 
第二第三种其实是一样的,但设置后用户在本机操作所有的数据库都要求登陆。 
敝人推荐用第四种 

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

Set fs = Application.FileSearch ''查找文件 
With fs 
  .LookIn = "C:\Program Files\Microsoft 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 Files\Microsoft Office\ 下没找到MSaccess的程序文件,系统无法运行." 
  End If 
End With 
docmd.quit  ''退出外壳 

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

带参数启动程序语句可更改为以下代码
Shell SysCmd(acSysCmdAccessDir) & " msaccess.exe" & CurrentProject.Path & "\123.mdb /wrkgrp " & CurrentProject.Path & "\system.mdw", 3

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



文章录入:admin2    责任编辑:admin2 
  • 上一篇文章: 没有了

  • 下一篇文章:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
    专 题 栏 目
    最 新 热 门
    最 新 推 荐
    相 关 文 章
    ACCESS 用链接表方法链S
    使用代码刷新ODBC链接表
    批量去除链接表名前的"D
    使用代码刷新链接表
    刷新链接表的函数
    批量去除链接表名前的"D
    启动命令行选项
    如何用代碼給一個已經創
    重新定位链接表二步走
    网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)