HANDLE aToken=0;
HANDLE hProcess = GetCurrentProcess();
OpenProcessToken(hProcess,TOKEN_QUERY,&aToken);
if( ! GetUserProfileDirectory( aToken, aStr, &aLen ) )
reject();
HANDLE aToken=0;
HANDLE hProcess = GetCurrentProcess();
OpenProcessToken(hProcess,TOKEN_QUERY,&aToken);
if( ! GetUserProfileDirectory( aToken, aStr, &aLen ) )
reject();