Einzelnen Beitrag anzeigen

Benutzerbild von FAlter
FAlter

Registriert seit: 21. Jul 2004
Ort: Ostfildern
1.095 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#2

Re: HTTP-Server mit PASCAL als Scriptsprache

  Alt 18. Aug 2004, 16:08
So, jetzt gibts wieder 'ne neue Version. Wichtig hierfür ist beispielsweise, dass man folgendes kann:

Response_Content_Type := 'text/plain'; Wenn eine .htmlops-Datei "Nur-Text" anstelle von HTML enthält, wäre so etwas ganz nüztlich.[/delphi]

Delphi-Quellcode:
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>
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.

So, jetzt habe ich hoffentlich genügend Diskussionsstoff gegeben.
Angehängte Dateien
Dateityp: zip chat_test.zip (3,3 KB, 13x aufgerufen)
Felix Alter
Japanurlaub 2015
  Mit Zitat antworten Zitat