Como gravar na pasta comum Application Data?

Eu tenho um aplicativo Visual Basic 6.0 que eu quero instalar paraTodos os usuáriosPor exemplo, a configuração é realizada em um único ponto, independentemente de quem faz o login no computador. Eu tenho o seguinte código para localizar o local comum:

<code>Const ssfCOMMONAPPDATA = &H23
Dim strAllUsersPath As String

strAllUsersPath = CreateObject("Shell.Application").NameSpace(ssfCOMMONAPPDATA).Self.Path
</code>

No Windows XP, esse caminho aponta paraC:\Documents and Settings\All Users\Application Data\ pasta. A configuração copia o arquivo de configurações e tudo é ótimo. O aplicativo Visual Basic 6.0 pode alterá-lo a qualquer momento.

No Windows 7, esse caminho aponta parac:\ProgramData pasta. A configuração, que requer privilégios de administrador, copia o arquivo lá. No entanto, quando o meu aplicativo Visual Basic 6.0 inicia e acessa o arquivo, o Windows 7 copia o arquivo de configurações para um C: \ Users {LOGIN DO USUÁRIO} \ AppData \ Local \ VirtualStore \ e executa todas as operações nele. Como resultado, como para cada usuário, o Windows 7 copia o arquivo de configurações para um diretório de usuários separado, os usuários acabam tendo um arquivo de configurações diferente.

Eu estou armazenando o arquivo no local errado? Estou fazendo isso da maneira incorreta?

questionAnswers(1)

yourAnswerToTheQuestion