| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
  | 
| Ausgewählter Eintrag: | Zur Liste | 
<perl>
get "Id==*","anmeldungen";
while (get_next "anmeldungen")
{
put ["eigentuemer",$benutzername,"bildpfad","http://www.niederrhein-singles.de/Photo/000.gif","bildnummer","2"],"bilder";
}
if ($cmd eq "")
{
get "aktiv=ja","anmeldungen","holen"; 
while (get_next("holen")) 
           {
            %_put=%_loop;
            $_put{_amount}=1;
            put undef,"benutzerverwaltung";
            undef %_put;
            del "Id==$_id","anmeldungen"; 
           }
}
</perl>
| Alle Einträge zum Thema: | Zur Liste | 
<perl>
get "Id==*","anmeldungen";
while (get_next "anmeldungen")
{
put ["eigentuemer",$benutzername,"bildpfad","http://www.niederrhein-singles.de/Photo/000.gif","bildnummer","2"],"bilder";
}
if ($cmd eq "")
{
get "aktiv=ja","anmeldungen","holen"; 
while (get_next("holen")) 
           {
            %_put=%_loop;
            $_put{_amount}=1;
            put undef,"benutzerverwaltung";
            undef %_put;
            del "Id==$_id","anmeldungen"; 
           }
}
</perl>
<perl>
if(%_put)
{
 
$emsg.="<font size=2 color=#000080 face=verdana><b>Bitte geben Sie eine ObjektNummer ein!</b>  (Klicken Sie auf Back bzw. Zurück in Ihrem Browser.)</font><br> " if $_put{ObjNr} eq "";
 
 get "ObjNr==$_put{ObjNr}", "haus";
 if ($_amount>0 && $ObjNr eq $_put{ObjNr}) 
 {
  $emsg.= "<font size=2 color=#000080 face=verdana><b>Die ObjektNummer $ObjNr ist bereits vorhanden!</b><br>
    Bitte wählen Sie eine neue ObjektNummer!  (Klicken Sie auf Back bzw. Zurück in Ihrem Browser.)</font><br>";
  }
  if($emsg eq "")
  {
     put;
     out "Ihre Anmeldung war erfolgreich!";
  } 
  else
  {
     out "$emsg";
     undef %_put;
  }
 
 }
 
</perl>
while (get_next("holen")) 
           {
            %_put=%_loop;
            $_put{_amount}=1;
            delete $_put{_id};
            delete $_put{Id};
            put undef,"benutzerverwaltung";
            undef %_put;
            del "Id==$_id","anmeldungen"; 
           }
}
            delete $_put{_id};
            delete $_put{Id};
| Liste der Einträge von 43051 bis 43201: | 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 |