Programmnutzung einfach ermitteln

[cltom]

Hallo,

da ich im Bereich Netzwerk besonders wenig Erfahrung hab, mal eine Anfängerfrage. Ich hätte gern einen möglichst einfachen Weg, wie mir mein Programm meldet "hallo, ich bin gerade gestartet worden", also im Grunde an einen Server eine kleine Zeile in eine Textdatei reinschreibt. Der Output kann absolut spartanisch sein.

Könnt ihr mir mal ein paar Schlagworte geben, mit welchen Komponenten und Grundideen das zu machen ist? Zur Verfügung steht XE2 Professional.

dank und gruß
tom

[Sir Rufo]

z.B. mit den Indy Komponenten

Such dir einen Transportweg aus mit einem Standardprotokoll (z.B. HTTP) oder du baust dir das Protokoll komplett selber (würde ich aber zunächst von abraten)

[p80286]

Zitat von cltom:

, also im Grunde an einen Server eine kleine Zeile in eine Textdatei reinschreibt.

Und warum tust Du nicht genau dies?

Gruß
K-H

[cltom]

Danke einmal. Werde mich einmal an dem hier:

http://www.delphipraxis.net/30180-st...hreiben-2.html

nebst dem hier

http://www.delphipraxis.net/160152-i...protokoll.html

versuchen

[cltom]

Nun, das funktioniert in Ansätzen. eine grundsätzliche Frage aber noch. Ich brauch/hab hier einen proxy, sonst bekomm ich keine Verbindung. Wenn ich den Proxy angebe beim TIdHTTP, dann klappt es auch, aber es hat ja natürlich nicht jeder Nutzer später einen (diesen) Proxy. Wie geht man damit um?

[user0815]

Proxy Server Einstellungen des IE abfragen

http://www.delphipraxis.net/138508-post1.html

[Sir Rufo]

Zitat von cltom:

Nun, das funktioniert in Ansätzen. eine grundsätzliche Frage aber noch. Ich brauch/hab hier einen proxy, sonst bekomm ich keine Verbindung. Wenn ich den Proxy angebe beim TIdHTTP, dann klappt es auch, aber es hat ja natürlich nicht jeder Nutzer später einen (diesen) Proxy. Wie geht man damit um?

Entweder abfragen (wie schon gesagt) oder dem Benutzer eine Einstellungsseite mit den Proxy-Eistellungen präsentieren?

• Kein Proxy
• Proxy vom System (Internet Explorer)
• Proxy-Einstellungen

[cltom]

nochmals danke, das nimmt langsam Form an (in anderen Worten: der zusammengeschusterte Fleckerlteppich lässt sich zumindest schon compilieren).

Eine Sache ist noch offen: Die Prozedur ist ziemlich genau wie im original, den Proxy hab ich jetzt mal bei mir drin.

Delphi-Quellcode:

var
  Params: TStringList;
  Enc: TEncoding;
  ResponseStr: string;
begin
  with TIdHTTP.Create(nil) do
    try
      //hier wurde der Proxy eingefügt
      Request.ContentType := 'application/x-www-form-urlencoded';
      Params := TStringList.Create;
      try
        with Params do
        begin
          Add('sometext');
        end;
        Enc := CharsetToEncoding(Request.CharSet);
        try
          ResponseStr := Post('http://www.delphipraxis.net/login.php?do=login', Params, Enc);
        finally
          Enc.Free;
        end;
      finally
        Params.Free;
      end;
    finally
      Free;
    end;

hier wird kein Params-String übergeben. Wenn ich die php-Datei im Browser aufrufe, klappt es. Es wird das php auch ausgeführt (ich lasse im php einen Text einfügen, der kommt auch, bloß eben der Params-String nicht).

Habt Ihr da noch Hinweise?

[Sir Rufo]

Nein, denn wir wissen ja nicht, was dein PHP Skript erwartet

[cltom]

sorry, hab das auch ziemlich so aus dem Link übernommen:

Code:

<?php
$datei = "datei.txt";
$datum = date("Y.m.d | h:i:s");
$fulltext = $datum." | ".$_SERVER['QUERY_STRING']."\r\n";

if (file_exists ($datei) && is_writable ($datei))
{
 $handle = fopen ($datei, a);
 fwrite ($handle,$fulltext);
 fclose ($handle);
}
?>