时间：2009-07-17 10:42 来源：www.office-cn.net 作者：江羽 阅读：次

我们VBA编程中，有时需要获取 Msaccess.exe 安装路径，如：用 shell 方法启动带工作组mdb项目时，就必须指定 Msaccess.exe 的安装路径。下面介绍两种方法： 方法一：通过SysCmd函数 debug.print SysCmd(acSysCmdAccessDir) 方法二：通过注册表键值获取 Private ER_CrpShell As Object ’------------------------------------------------------ '功 能: 读取注册表指路径键值 '输 入: strRegKey 字符串变量，指定注册表键值路径 '输 出:　　RegRead 字符串变量，输出所获得路径Office中国社区门户6]Y:mg*N9j+Pb ’------------------------------------------------------ Public Function RegRead(strRegKey As String) As String On Error Resume Next Set ER_CrpShell = CreateObject("WScript.Shell") RegRead = ER_CrpShell.RegRead(strRegKey) Set ER_CrpShell = Nothing End Function debug.print RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msaccess.exe\path")

(责任编辑：admin)

上一篇：你的MDB+SQL連接表安全嗎?
下一篇：让您的用户进行排序

• ·提高access的启动速度【译文技巧】
• ·浅谈断号重续的利弊和方法
• ·分析使用Len函数判断字符串为空的原理
• ·mdb快捷方式拖到桌面，打开会出现“不
• ·Access设计表字段是的注意事项
• ·学习别人示例的技巧方法
• ·SQL中获取两日期之间的值
• ·成为伟大开发者的“九步曲”
• ·面向初学者的窗体功能设计集成
• ·WINRAR打包视频演示全过程
• ·《VB函数参考手册》电子书
• ·ACCESS数据表中数据类型“是/否”转为S
• ·Application与Docmd对象Quit方法区别探
• ·获取ACCESS安装路径的二法(分享)
• ·JAVA+ACCESS编程体会
• ·Access 2003开发者扩展工具集概述