|
so, damit ihr euch auch direkt mit anderen unterhalten könnt,
habe ich euch dies kleine Forum hier eingerichtet...
das hier ist kein Gästebuch, wenn ihr euch im Gästebuch verewiglichen wollt, dann
geht bitte dorthin...';
$meldungen[1]='das muss ich mal sagen...';
$meldungen[2]='zurück zum kleinen Forum';
$meldungen[3]='neues Thema';
$meldungen[4]='kein Eintrag im feld, Thema oder Name oder Beitrag zu kurz, bitte ergänzen';
$meldungen[5]='Antwort zum Thema: ';
$meldungen[6]='kein Eintrag im Feld Name oder Beitrag zu kurz, bitte ergänzen';
$meldungen[7]='Beitrag wurde gespeichert ';
$meldungen[8]='hier war wohl noch keiner';
$maxproseite=5; # maximale Anzahl der angezeigten News-Verweise pro seite
#Ab hier der eigentliche Programmablauf
echo ''.$meldungen[0].' ';
if(!$sent) #Seite wird aufgerufen
{
echo ''.$meldungen[1].'';
echo '
';
auslesen(); #kopfdaten auslesen
if(!$daten or count($daten)<1) # noch keine Daten vorhanden
echo '
'.$meldungen[8];
else
zeige_news(); #Kopfdaten anzeigen
}
elseif($sent and ($sent=="neu" or $sent=="save")) # Vorgang ausgewählt
{
echo ''.$meldungen[2].'';
echo '
';
if($sent=="save") #Neueingaben gemacht
{
if($thema=="" or strlen($Beitrag)<10 or $autor=="") #kein thema oder Beitrag zu kurz oder kein Name
{
echo $meldungen[4];
Beitragform(); # formular erneut aufrufen
exit;
}
##eingebene Daten ok, daten speichern
$Datum=date("d.m.y.H.i.s"); #erstelldatum
$Datum_a=date("d.m.y H:i:s");
$kennung="mess_".strtr($Datum,".","_"); #datensatzkennung vergeben
if(file_exists($mesdat)) #kopfdatendatei schon vorhanden
$tempdat=fopen($mesdat,"a"); #zum schreiben öffenen Datensatz anhängen
else
$tempdat=fopen($mesdat,"w"); #erstelln zum schreiben öffnen 1.datensatz schreiben
#Daten eintragen
fputs($tempdat,$kennung. "*|*".stripslashes(nl2br(htmlspecialchars(autor))). "*|*" .$Datum_a. "*|*" .stripslashes(nl2br(htmlspecialchars($thema)))."*|**|*\n");
fclose($tempdat);# dateihandle schließen
#Dateiinhalt schreiben
if(!$htmlok)
$Beitrag=stripslashes(nl2br(htmlspecialchars($Beitrag)));
else
$Beitrag=$Beitrag;
$txt=' Thema:'.stripslashes(nl2br(htmlspecialchars($thema))).'
';
$txt=$txt.''.$Datum_a.'
';
$txt=$txt.'message:
'.$autor.' schrieb:
';
$txt=$txt.''.$Beitrag.'
';
$txt=$txt.'antwort schreiben
';
$tempdat=fopen($kennung.".htm","w"); #datei anhand der Kennung erzeugen und Beitragstext eintragen
fputs($tempdat,$txt);
fclose($tempdat);
echo $meldungen[7];
exit;
}
Beitragform(); # formular aufrufen
}
##################
elseif($sent and ($sent=="antw" or $sent=="antwsave")) # Vorgang ausgewählt
{
echo ''.$meldungen[2].'';
echo '
';
if($sent=="antwsave") #Neueingaben gemacht
{
if(strlen($Beitrag)<10 or $autor=="") # Beitrag zu kurz oder kein Name
{
echo $meldungen[6];
Beitragform(); # formular erneut aufrufen
exit;
}
##eingebene Daten ok, daten speichern
$Datum_a=date("d.m.y H:i:s");
#Daten eintragen
#Dateiinhalt schreiben
if(!$htmlok)
$Beitrag=stripslashes(nl2br(htmlspecialchars($Beitrag)));
else
$Beitrag=$Beitrag;
$txt='Reply:'.stripslashes(nl2br(htmlspecialchars($thema))).'
';
$txt=$txt.''.$Datum_a.'
';
$txt=$txt.'message:
'.$autor.' schrieb:
';
$txt=$txt.''.$Beitrag.'
';
$tempdat=fopen($satznummer.".htm","a"); #datei anhand der Satznummer öffnen und Beitragstext eintragen
fputs($tempdat,$txt);
fclose($tempdat);
echo $meldungen[7];
exit;
}
$altthema="";
auslesen();
for($i=0;$i< count($daten);$i++)
{
if($daten[$i][0]==$satznummer)
$altthema=$daten[$i][3];
}
Beitragform(); # formular aufrufen
}
?>
'.$meldungen[3].'';
$sent="save";
}
else
{
if($thema=="")
$thema=$altthema;
$sent="antwsave";
echo ''.$meldungen[5].$thema.' ';
}
?>
Seite:';
for($i=1;$i<=$szahl;$i++)
{
if($i!=$szpara)
echo ' '.$i.' ';
else
echo $i;
}
#darstellen der bisherigen Beiträge
echo ' von '.$szahl.'';
echo '
';
for($i=$startwert;$i<=$endwert;$i++)
{
include($data[$i][0].".htm");
echo '
';
}
}
?>
|
|
