AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Grundsätzliche Frage zur Kommunikation übers Internet
Thema durchsuchen
Ansicht
Themen-Optionen

Grundsätzliche Frage zur Kommunikation übers Internet

Ein Thema von Grolle · begonnen am 1. Mär 2006 · letzter Beitrag vom 17. Mär 2006
Antwort Antwort
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.157 Beiträge
 
Delphi 10.3 Rio
 
#1

Re: Grundsätzliche Frage zur Kommunikation übers Internet

  Alt 3. Mär 2006, 10:55
OK!

Walkthrough:

Datei - Neu - weitere - Web Server Anwendung
ISAPI*.*

ObjektInspector (OI) : Actions Klick - Neu

OI: Pathinfo := /LOGIN
OI: Ereignisse OnAction dblKlick

Delphi-Quellcode:
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
  response.Content := 'Keine anderer User online!'; // lol
  IP := request.RemoteAddr;
  UserName := Request.QueryFields.Values['NAME'];
  UserPass := Request.QueryFields.Values['PASSWORT'];

  Handled := true; // default
end;
Dann auf Server laden...

www.deineDomain.de/cgi/IPCheck.dll

Für das cgi Verzeichniss noch die Rechte setzen...

User : IUSR_MASCHINENNAME Ausführen und Dateierstellen/schreiben, falls Du die IP in eine Dateischreiben willst... (Achtung Threadsave "TMultiReadExclusiveWriteSynchronizer" verwenden)

Aufruf dann wie gesagt:

idhttp1.get('http://www.deineDomain.de/cgi/IPCheck.dll/LOGIN?NAME=ABC&PASSWORT=DEF',IPListe); mfg Frank (Hoffe es hilft)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:53 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz