| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| Ausgewählter Eintrag: | Zur Liste |
<html><head><title></title></head><body bgcolor="white"> <perl>
{
get "Name==!$namerein", "Name der Passworddatenbank";
if($Passwort ne "" && $Passwort eq $pwrein)
{
do_all "db=Name der auszugebenden Datenbank spacing=1 border=0 gridcolor=teal padding=1 dataface=Arial datacolor=black datasize=2 databack=white dataalign=left headface=Arial headcolor=black headsize=2 headback=silver headalign=left headsize=2 headalign=left maxlistlength=50 showamount=sel,all selectbrowse=top indexbrowse=top pagebrowse=top buttonbrowse=no listtype=list indexfield=Name input=link", "namerein", "pwrein";
} else
{
out "<b>Anmeldung fehlgeschlagen!</b>";
$namerein="";
}
if($namerein eq "")
{
<h2>Anmeldung</h2>Bitte melden Sie sich an: <form action="http://lupara.org/baseportal.de/cgi-bin/baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"> <input type=hidden name="htx=" value="$htx"> <table> <tr><td>Name:</td><td><input type="text" name="namerein="></td></tr> <tr><td>Passwort:</td><td><input type="password" name="pwrein="></td></tr> <tr><td></td><td><input type=submit value="Anmelden"></td></tr> </table></form> EOF
</perl>
| Alle Einträge zum Thema: | Zur Liste |
<perl>
if($namerein ne "" && $sid eq $nutzer_sid && $sid_aktuell <= $sid_max) ## Alles was mit Login erlaubt ist
{
out <<EOF;
<div id="ueberschrift">Erfassung Einsätze</div>
<p>
<do action=all db=einsaetze/pflege sort=-Datum range^=0,200 pagebrowse=no buttonbrowse=no listtype=list listfields=Datum,Stichwort,Einsatzort input=top>
EOF
}
else # Alles was man sehen kann, wenn man nicht eingeloggt ist
{
out <<EOF;
out ""; } </perl>
<html>
<head>
</head>
<div id="ueberschrift">Datenbankpflege</div>
<br>Nach Ihrer Anmeldung können Einsatzlisten und Berichte gepflegt werden.<br><br>
<include src=login>
<br><br>
<perl>
if($namerein ne "" && $sid eq $nutzer_sid && $sid_aktuell <= $sid_max) ## Alles was mit Login erlaubt ist
{
out <<EOF;
<div id="ueberschrift">Erfassung Einsätze</div>
<p>
EOF
do_all "db=einsaetze/main sort=-Datum range^=0,200 pagebrowse=no buttonbrowse=no listtype=list listfields=Datum,Stichwort,Einsatzort input=top";
}
else # Alles was man sehen kann, wenn man nicht eingeloggt ist
{
out <<EOF;
EOF } </perl>
</body> </html>
<html><head><title></title></head><body bgcolor="white"> <perl>
{
get "Name==!$namerein", "Name der Passworddatenbank";
if($Passwort ne "" && $Passwort eq $pwrein)
{
do_all "db=Name der auszugebenden Datenbank spacing=1 border=0 gridcolor=teal padding=1 dataface=Arial datacolor=black datasize=2 databack=white dataalign=left headface=Arial headcolor=black headsize=2 headback=silver headalign=left headsize=2 headalign=left maxlistlength=50 showamount=sel,all selectbrowse=top indexbrowse=top pagebrowse=top buttonbrowse=no listtype=list indexfield=Name input=link", "namerein", "pwrein";
} else
{
out "<b>Anmeldung fehlgeschlagen!</b>";
$namerein="";
}
if($namerein eq "")
{
<h2>Anmeldung</h2>Bitte melden Sie sich an: <form action="http://lupara.org/baseportal.de/cgi-bin/baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"> <input type=hidden name="htx=" value="$htx"> <table> <tr><td>Name:</td><td><input type="text" name="namerein="></td></tr> <tr><td>Passwort:</td><td><input type="password" name="pwrein="></td></tr> <tr><td></td><td><input type=submit value="Anmelden"></td></tr> </table></form> EOF
</perl>
| Liste der Einträge von 40350 bis 40500: | 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 |