System variable

[Vsn]

Hi all,

Who can tell me where I can get the Windows "My documents" directory? Must
be somthing like stPath=office.system.path.....

Thx alot,
Ludovic

 

[Terry Kreft]

Look at
http://www.mvps.org/access/api/api0054.htm

You want CSIDL_PERSONAL

 

[Vsn]

Thx, much more complicated as I expected.

Ludovic

 

[John Nurick]

How about:
Dim WshShell As Object, strMyDocuments As String
Set WshShell = CreateObject("WScript.Shell")
strMyDocuments = WshShell.SpecialFolders("AllUsersDesktop")
Set WshShell = Nothing

 

[Terry Kreft]

This relies on scripting being enabled on th target machine.

 

[Terry Kreft]

I'm guessing you mean the code to achieve this is much more complicated than
you expected as all you have to do is paste the code provided into a module
and then use.
stPath = fGetSpecialFolderLocation(CSIDL_PERSONAL)