Default Programmverzeichnis von Windows abfragen - Fehler bei x64 OS

Mahlzeit,

nachdem ich doch recht lange ohne Hilfe ausgekommen bin, stehe ich jetzt vor einem Problem, wo ich nicht weiter weiß.
Das Problem ist eigentlich recht simpel. Ich möchte das default Programmverzeichnis von Windows abfragen, also z.B. "Programme" unter Win7 bzw. "Program Files (x86)" für 32bit Programme unter Win 7 x64.

Die Abfrage selbst ist nicht wirklich schwer, jedoch bekomme ich unter x64 OS grundsätzlich das x86 Programmverzeichnis ausgegeben.

Ich habe es mittlerweile sowohl mit der Umgebungsvariable versucht:

local $test = EnvGet("ProgramFiles")
msgbox(0, "", $test)

als auch mit der Abfrage über die Registry:

local $lProgramDirectory = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "ProgramFilesDir")

Hat einer einen Tipp, woran das liegen könnte bzw. gibt es einen Workaround?

Danke Euch schon mal im Voraus.

Gruß, phr3n1c

Danke für den Tipp, aber leider habe ich das bereits hinter den includes angegeben. Funktioniert trotzdem nicht

Oder du nimmst

Zitat von Hilfe

[autoit]

@ProgramFilesDir

[/autoit]

---> Pfad zum Programme-Ordner (entspricht der Systemvariable %PROGRAMFILES%).

Bringt auch das x86 Programmverzeichnis. Habe es unter Win 7 x64 und Server 2k3 x64 getestet.

hmm... zumindest nicht bewusst eingetragen.

Kann das evtl. mit der Option "Use native x64 ... where possible" bei der Installation von AutoIt zusammenhängen?

Also es muss wohl soetwas sein. Selbst

MsgBox(64, 'DOS', _getDOSOutput('set'))

Func _getDOSOutput($command)
Local $text = '', $Pid = Run(@ComSpec & ' /c ' & $command, '', @SW_HIDE, 2 + 4)
While 1
$text &= StdoutRead($Pid, False, False)
If @error Then ExitLoop
Sleep(10)
WEnd
Return $text
EndFunc ;==>_getDOSOutput

gibt mir sowohl für %ProgramFiles% als auch %ProgramFiles(x86)% jeweils C:\Programme (x86) aus.

Dann eben so:

MsgBox (0, "ProgramFilesDir", _ProgramFilesDir())

Func _ProgramFilesDir()
If @OSArch <> "x86" Then
$ProgramFilesDir = @ProgramFilesDir&"(x86)"
Else
$ProgramFilesDir = @ProgramFilesDir
EndIf
Return $ProgramFilesDir
EndFunc

Das bewirkt leider genau das Gegenteil:
[Blockierte Grafik: http://img248.imageshack.us/img248/5757/autoitx64prob.jpg]

Ich habe gerade den Code als x64 kompilieren lassen. Damit wird das Verzeichnis korrekt ausgegeben. Leider lässt es sich damit nicht mehr unter x86 OS ausführen, da keine gültige win32-Anwendung.

AspirinJunkie:
leider besteht über die Registry das gleiche Problem.

Werde es wohl nun so versuchen:

$programdir = @ProgramFilesDir
if @OSArch = "X64" then $programdir = StringReplace(@ProgramFilesDir, " (x86)", "")

Ich danke Euch für Eure Hilfe.

Es ist klar, dass ein Programm, das im 32bit-Modus läuft, immer das x86-Verzeichnis erhält. Nur ein 64-bit Programm bekommt das x64-Verzeichnis (so sollte es jedenfalls sein)

Hier gibt es die Variablenliste: http://msdn.microsoft.com/en-us/library/…28VS.85%29.aspx