hb_GetEnv('programfiles'))
e
GetEnv('programfiles'))
no windows 64 bits
retorna sempre "C:\Program Files (x86)"
isto acontece sempre que duas variáveis de ambiente são iguais ate a parte que você necessita
EX:
ProgramFiles
ProgramFiles(x86)
gambiarra para fazer funcionar
FUNCTION GetEnvProgramFiles()
LOCAL sRet
sRet := hb_GetEnv('programfiles')
IF Right(Upper(sRet), 5) = '(X86)'
sRet := Trim(Left(sRet, Len(sRet) - 5))
ENDIF
RETURN sRet
010011110010000001110011011101010110001101100101011100110111001101101111001000001110100100100000011000110110111101101110011100110111010001110010011101011110110101100100011011110010000001100001001000000110111001101111011010010111010001100101
01001101011000010111001001100011011011110111001100100000010000010110111001110100011011110110111001101001011011110010000001000100011001010010000001000010011011110110111001101001
0101010001100101011011000011101000100000001010000011001000110111001010010011100100101101001110010011100000110100001100110010110100110101001100100011100100110000