Passwortschutz für jeden Eintrag - Beispiel aus der Bibliothek - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von steffen niegsch (73 Beiträge) am Freitag, 4.Januar.2002, 17:09.
    Passwortschutz für jeden Eintrag - Beispiel aus der Bibliothek

      Hallo,

      in der Bibliothek ist das untere Beispiel für den Passwortschutz pro Nutzereintrag.
      Dafür wird aber ein extra Formular erstellt.
      Ist es möglich das sich das mit den entsprechenden Daten
      gefüllte Orginal-Eingabeformular öffnet? Dieses kann dann der Nutzer ändern und die Änderung wird übernommen wenn das Passwort richtig ist.

      steffen


      -------------------------------------------------------------------
      <html><head>
<title>baseportal Datenbank</title>
</head><body bgcolor=ffffff>
<br><ul>

      <perl>

      put if %_put;

      if($Id ne "")
      {
  get "Id==$Id";

        if($xName)
  {
    if($Passwort eq $xPasswort)
    {
      mod "Id==$Id", ["Name",$xName,"Telefon",$xTelefon];
      out "<b>Eintrag geändert...</b>";
    } else
    {
      out "<b>Passwort falsch!</b>";
    }
  } else
  {
    out <<EOF;
<h3>Eintrag ändern</h3>
<table>
<form action="/cgi-bin/baseportal.pl?htx=$htx&Id=$Id" method="post" enctype="multipart/form-data">
<input type=hidden name="htx=" value="$htx">
<input type=hidden name="Id=" value="$Id">
<tr><td>Name:</td><td><input type="text" name="xName=" value="$Name"></td></tr>
<tr><td>Telefon:</td><td><input type="text" name="xTelefon=" value="$Telefon"></td></tr>
<tr><td>Passwort:</td><td><input type="password" name="xPasswort="></td></tr>
<tr><td></td><td><input type=submit value="Abschicken"> </td></tr>
</form></table>
EOF

        }
  out "<p><a href=\"$_link\">Neuer Eintrag</a>";

      } else
      {
  out "<h3>Neuer Eintrag</h3>";
  out "Mit dem Passwort können Sie den Eintrag später bearbeiten.";

        init; get;
  list "add";
      }

      get;

      out "<h3>Liste aller Einträge</h3>";

      out "<table><tr><td>Name</td><td>Telefon</td></tr>";
while(get_next)
{
  out "<tr><td><a href=\"$_link&Id=$_id\">$Name</a></td><td>$Telefon</td></tr>";
}
out "</table>";
</perl>

      </body></html>
      --------------------------------------------------------------------


    Antworten 
 Liste der Einträge von 52050 bis 52200: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

Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.06s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!