| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| Ausgewählter Eintrag: | Zur Liste |
<perl>
if(%_put)
{
$emsg.="Vereinsname, <br>" if $_put{Verein} eq "";
$emsg.="Ansprechpartner, <br>" if $_put{Ansprechpartner} eq "";
$emsg.="Strasse, <br>" if $_put{Strasse} eq "";
$emsg.="PLZ, <br>" if $_put{PLZ} eq "";
$emsg.="Ort, <br>" if $_put{Ort} eq "";
$emsg.="Telefon, <br>" if $_put{Telefon} eq "";
$emsg.="Email, <br><br>" if $_put{Email} eq "";
if($emsg eq "")
{
@zahlen = (0 .. 9);
$Verein_PW = join("", @zahlen[ map { rand @zahlen } ( 1 .. 6) ] );
$_put{Verein_PW}=$Verein_PW; ## Passwort schreiben
get "Verein_ID==#", "nutzer"; ## letzte Nummer aus DB holen
$_put{Verein_ID}=++$count; ## diese Nummer um eins erhöhen
mail "
| Alle Einträge zum Thema: | Zur Liste |
<perl>
if(%_put)
{
$emsg.="Vereinsname, <br>" if $_put{Verein} eq "";
$emsg.="Ansprechpartner, <br>" if $_put{Ansprechpartner} eq "";
$emsg.="Strasse, <br>" if $_put{Strasse} eq "";
$emsg.="PLZ, <br>" if $_put{PLZ} eq "";
$emsg.="Ort, <br>" if $_put{Ort} eq "";
$emsg.="Telefon, <br>" if $_put{Telefon} eq "";
$emsg.="Email, <br><br>" if $_put{Email} eq "";
if($emsg eq "")
{
@zahlen = (0 .. 9);
$Verein_PW = join("", @zahlen[ map { rand @zahlen } ( 1 .. 6) ] );
$_put{Verein_PW}=$Verein_PW; ## Passwort schreiben
get "Verein_ID==#", "nutzer"; ## letzte Nummer aus DB holen
$_put{Verein_ID}=++$count; ## diese Nummer um eins erhöhen
mail "
| Liste der Einträge von 40950 bis 41100: | Einklappen | Zur Eingabe |
| Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
| © baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |