总的来说，使用Oracle数据库，我如何确定当前用户的应用程序数据文件夹在哪里？FileSystemObjects特殊文件夹只知道3个文件夹
具体来说，我需要一个Word宏复制文件到应用程序数据文件夹下的文件夹。例如，在VB.Net中，我可以使用My.Computer.FileSystem.SpecialDirectories.CurrentUserApplicationData来完成此操作
My.Computer.FileSystem.SpecialDirectories.CurrentUserApplicationData
hof1towb1#
您可以使用Environ("AppData")来获取此路径。Environ将拉取任何系统变量，可以在DOS提示符下使用set命令找到这些变量。
Environ("AppData")
set
rslzwgfq2#
使用advapi32.dll，可以通过以下方式获取USERPROFILE：
advapi32.dll
USERPROFILE
Environ("USERPROFILE")
字符串将此目录与“ApplicationData”目录（该目录有一个标准的特定名称）连接，以获取您想要的内容
CStr(Environ("USERPROFILE") & "\Application Data")
型有关更多信息，请查看MSDN
6ss1mwsb3#
使用此函数只返回已登录的特定用户的名称。
MsgBox Left(Replace(Environ("APPDATA"), Left(Environ("APPDATA"), InStr(1, Environ("APPDATA"), "Users") + 5), ""), InStr(1, Replace(Environ("APPDATA"), Left(Environ("APPDATA"), InStr(1, Environ("APPDATA"), "Users") + 5), ""), "\") - 1), vbOKOnly
字符串
3条答案
按热度按时间hof1towb1#
您可以使用
Environ("AppData")来获取此路径。Environ将拉取任何系统变量，可以在DOS提示符下使用set命令找到这些变量。rslzwgfq2#
使用
advapi32.dll，可以通过以下方式获取USERPROFILE：字符串
将此目录与“ApplicationData”目录（该目录有一个标准的特定名称）连接，以获取您想要的内容
型
有关更多信息，请查看MSDN
6ss1mwsb3#
使用此函数只返回已登录的特定用户的名称。
字符串