mirror of
https://gitlab.com/harald.mueller/aktuelle.kurse.git
synced 2024-11-27 20:21:56 +01:00
69 lines
1.8 KiB
PHP
69 lines
1.8 KiB
PHP
|
<?php
|
|||
|
function SchreibeDatei ($Email,$Name,$Kommentar)
|
|||
|
{
|
|||
|
# Feldinhalte Email, Name und Kommentar werden in externe Datei geschrieben
|
|||
|
$datei = "gbook.txt";
|
|||
|
# entfernt HTML-Tags aus dem Kommentar:
|
|||
|
$Kommentar = strip_tags ($Kommentar);
|
|||
|
# wandelt Sonderzeichen im Kommentar in HTML-Code um:
|
|||
|
$Kommentar = htmlentities ($Kommentar);
|
|||
|
# entfernt Backslashes aus dem Kommentar:
|
|||
|
$Kommentar = stripslashes ($Kommentar);
|
|||
|
# ersetzt Zeilenschaltungen im Kommentar durch <br>,
|
|||
|
# damit die Sortierung funktioniert:
|
|||
|
$Kommentar = str_replace ("\n", "<br>", $Kommentar);
|
|||
|
# wandelt Sonderzeichen im Namen in HTML-Code um:
|
|||
|
$Name = htmlentities ($Name);
|
|||
|
# Hier bitte Ihre Email-Adresse eingeben:
|
|||
|
$empfaenger = "IhrName@IhrServer";
|
|||
|
$betreff = "Neuer G<>stebucheintrag";
|
|||
|
$timestamp = time ();
|
|||
|
$datum = date ("d.m.Y",$timestamp);
|
|||
|
$uhrzeit = date ("H:i:s",$timestamp);
|
|||
|
$oeffnen = fopen ($datei, "a");
|
|||
|
if ($Name == "" or $Email == "" or $Kommentar == "")
|
|||
|
{
|
|||
|
echo "Bitte alle Felder ausf<73>llen!<br>";
|
|||
|
}
|
|||
|
else if ($oeffnen)
|
|||
|
{
|
|||
|
fwrite ($oeffnen,
|
|||
|
"<a href=\"mailto:$Email\">$Name</a>|$Kommentar|Eingetragen am $datum um $uhrzeit Uhr|<hr>\n");
|
|||
|
fclose ($oeffnen);
|
|||
|
# die folgende Zeile funktioniert nur, wenn sendmail konfiguriert ist!
|
|||
|
# mail ($empfaenger, $betreff, $Kommentar, "From: $Name <$Email>");
|
|||
|
$allesklar = TRUE;
|
|||
|
}
|
|||
|
else
|
|||
|
{
|
|||
|
$allesklar = FALSE;
|
|||
|
}
|
|||
|
return $allesklar;
|
|||
|
}
|
|||
|
# Funktion endet hier
|
|||
|
?>
|
|||
|
|
|||
|
|
|||
|
<html>
|
|||
|
<head>
|
|||
|
<title>G<EFBFBD>stebuch / Chat</title>
|
|||
|
</head>
|
|||
|
<body>
|
|||
|
|
|||
|
<?php
|
|||
|
# R<>ckmeldung f<>r den Benutzer
|
|||
|
$CallFunction = SchreibeDatei ($Email,$Name,$Kommentar);
|
|||
|
if ($CallFunction)
|
|||
|
{
|
|||
|
print ("Danke f<>r den Eintrag");
|
|||
|
}
|
|||
|
else
|
|||
|
{
|
|||
|
print ("Fehler, bitte noch einmal versuchen");
|
|||
|
}
|
|||
|
?>
|
|||
|
|
|||
|
<p>
|
|||
|
<a href="gbook5.php">Zur<EFBFBD>ck / Eintr<EFBFBD>ge lesen</a></p>
|
|||
|
</body>
|
|||
|
</html>
|