系统安装目录如何用代码表述？

xryacc2 · 发表于 2009-11-29 20:29:26

象%systemroot%这样的系统安装目录在VBA代码中怎样表述才能得到安装目录信息？谢谢。

chenzhirong2008 · 发表于 2009-11-29 21:10:33

用API
Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

xryacc2 · 发表于 2009-11-29 22:21:19

具体怎么写呢？

xryacc2 · 发表于 2009-11-29 22:34:52

比如我不知道用户的系统安装在什么盘符下，我要判定一个%systemroot%\system32\下的mswinsck.ocx是否存在，如何写呢

xryacc2 · 发表于 2009-11-29 22:53:30

问题已解决！谢谢chenzhirong2008 ，补充一下，与大家技术共享：
Dim a As String * 254
GetSystemDirectory a, 254
MsgBox a '弹出系统路径

帐号		自动登录	找回密码
密码			注册

[Access本身] 系统安装目录如何用代码表述？

群介绍
主题无相 (随机显示版	同地区群块其他地区)