ServerVariablen mit Delphi CGI.exe auslesen

[Stefan Schreier]

Hallo,<br><br>
ich möchte in meiner CGI-Anwendung Umgebungsvariablen<br>
(z.B.: REMOTE_USER, UNMAPPED_REMOTE_USER) auslesen,<br>
um den aktuell im System angemeldeten Nutzer feststellen zu können.<br>
Kennt jemand eine Möglichkeit, dies im OnAction Event einer<br>
TWebActionItem Komponente zu realisieren?<br>
Ich habe etwas ähnliches schon mal in einem Beitrag von Herrn Hummel<br>
in einer ISAPI gesehen. Dort werden die Werte aus dem<br>
TEXTENSION_CONTROL_BLOCK ermittelt.<br><br>
erstmal Danke<br><br>
Stefan Schreier

[Andreas Kosch]

Hallo,

da es sich bei der CGI um eine EXE handelt, kann diese direkt über die für diesen Prozess automatisch gemappten Umgebungsvariablen auf diese Infos zugreifen:
<pre>
var
szData : array[0..199] of Char;
begin
if (GetEnvironmentVariable('REMOTE_USER', szData, 199) > 0) then
....
</pre&gt

[Stefan Schreier]

Hallo Herr Kosch,<br><br>
das funktioniert wunderbar.<br><br>
Vielen Dank für ihre prompte Hilfe!!!<br><br>
Stefan Schreie

[Stefan Schreier]

Hallo Herr Kosch,<br><br>
gibt es auch eine Möglichkeit, eine Servervariable (ISAPI-Anwendung: REMOTE_USER)<br>
direkt aus einer Anforderung/Request (TWebRequest) auszulesen?<br><br>
Vielen Dank im Voraus<br><br>
Stefan Schreie