![]() |
HTTP-Server mit PASCAL und PHP als Scriptsprache
Dies ist ein Server, der .pas-Dateien abarbeitet (JvInterpreterProgram.Pas := Dateiinhalt) oder .HTMLOPS-Dateien (JvInterpreterProgram.Pas := Code zwischen '').
Folgende .HTMLOPS-Datei
Code:
Schreibt das Wort FAlterServer.
<!--$# PASCAL
begin Result := 'FAlter'; end; #$-->Server Das Programm ist Freeware für NICHT KOMMERZIELLE Zwecke (Delphi 6 Personal) Es ist ein HTTP-Server, der sich automatisch für alle eigenen IP-Nummern einrichtet und Port 80 nutzt (Firewall anpassen!!!) Es richtet sich als Taskbar-Icon ein - (inaktiv) oder ein + (aktiv) ein. Dieses Symbol und die Uhrzeit auf der "Serverstatus"-Seite werden alle 3 Sekunden aktualisiert. Die Deinstallation: Ggf. muss das Programmverzeichnis noch gelöscht werden. //Edit: Sucht euch aus ![]() |
Re: HTTP-Server mit PASCAL als Scriptsprache
Liste der Anhänge anzeigen (Anzahl: 1)
So, jetzt gibts wieder 'ne neue Version. Wichtig hierfür ist beispielsweise, dass man folgendes kann:
Delphi-Quellcode:
Wenn eine .htmlops-Datei "Nur-Text" anstelle von HTML enthält, wäre so etwas ganz nüztlich.[/delphi]
Response_Content_Type := 'text/plain';
Delphi-Quellcode:
Anbei noch ein Beispiel für den Pascal-Interpreter. Es ist zwar nicht besonders sicher, ausgereift, ..., aber immerhin, es funktioniert. Mann sollte in den Dateien die Pfade anpassen.
Irgendein HTML-Code... <!DOCTYPE...><html>...<body>...
<!--$# PASCAL if Request_Auth_Exists then Result := 'User ' + Request_Auth_Username + ' mit Passwort ' + Request_Auth_Password else begin Response_Auth_Realm := 'Es wird ein Passwort benötigt!'; Result := 'Passworteingabe!'; //Aus Sicherheitsgründen gegen Variant-Fehler end; #$--> Nochmehr HTML-Code... </body></html> So, jetzt habe ich hoffentlich genügend Diskussionsstoff gegeben. |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Schade, dass ich hier Selbstgespräche führen muss :cry:
Jedenfalls lässt sich für die neueste Version (1.0.0.18 ) PHP einrichten. Updatehinweis: Dieses mal sollte man die alte Version erst Deinstallieren, bevor man die neue raufspielt. |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
lol lustig, ein server der pascal kann *g* werd in mir aber nicht zulegen, da ich leider keinen eigenen server habe sondern nur webspacepaket, also bringts mir nix... aber gute idee irgendwie!
|
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Ja, auf jeden Fall ne coole Idee aber ich hab auch nicht das Geld für nen eigenen Server.
Naja, werd ihn vielleicht mal lokal installieren und testen. MfG Florian :hi: |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Schau ich mir an...
Hab nur die 17 gefunden. :cry: |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Zitat:
![]() |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Ja, jetzt sehe ich es auch :wink:
Habe mal das Chat Beispiel geladen. Bei mir funktionierts nur, wenn man es in ein Unterverzeichnis namens "Felix/Chat" kopiert und im Browser ".../Felix/Chat/index.pas" auch eingibt. Ansonsten bleibt der Server einfach stehen und lässt sich nicht runterfahren (FalterServer bleibt im Task-Manager). Mache ich da etwas falsch? |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Du musst im Script die Pfade anpassen. Pfade werden in HTMLOPS relativ zur Domain angegeben. Also
![]() Ansonsten wird ständig versucht, auf Die Datei zuzugreifen, bis es Klappt oder ein Timeout (habe ich da einen Fehler?) auftritt, Siehe Chat-Source. (Weil mehrere User gleichzeitig im Chat sind, aber nicht gleichzeitig zugreifen können. Wenn du eine bessere Idee hast...) Es gibt Probleme, wenn die Dateien nicht existieren oder an der falschen Stelle liegen. PS: Hat jemand eine Idee, wie man an php-cgi.exe POST-Daten übergeben kann? //Edit: Anhang gelöscht. |
Re: HTTP-Server mit PASCAL und PHP als Scriptsprache
Und Schon wieder eine neue Version, diesmal folgendes:
![]() ![]() Die erste Interaktion mit einem User hinsichtlich 1. Zu kleine Schrift 2. 'ne Scrollbar zu viel 3. 'nen Rechtschreibfehler |
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:09 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