會員登錄 - 用戶注冊 - 網站地圖 Office中國(office-cn.net),專業(yè)Office論壇
當前位置:主頁 > 技巧 > Access技巧 > 編程心得絕招 > 經驗泛談 > 正文

獲取ACCESS安裝路徑的二法(分享)

時間:2009-07-17 10:42 來源:www.mzhfr.cn 作者:江羽 閱讀:
我們VBA編程中,有時需要獲取 Msaccess.exe 安裝路徑,如:用 shell 方法啟動帶工作組mdb項目時,就必須指定 Msaccess.exe 的安裝路徑。下面介紹兩種方法: 方法一:通過SysCmd函數 debug.print SysCmd(acSysCmdAccessDir) 方法二:通過注冊表鍵值獲取 Private ER_CrpShell As Object ’------------------------------------------------------ '功 能: 讀取注冊表指路徑鍵值 '輸 入: strRegKey 字符串變量,指定注冊表鍵值路徑 '輸 出:  RegRead 字符串變量,輸出所獲得路徑Office中國社區(qū)門戶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)

頂一下
(0)
0%
踩一下
(0)
0%
發(fā)表評論
請自覺遵守互聯網相關的政策法規(guī),嚴禁發(fā)布色情、暴力、反動的言論。
評價: