baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
Alle Einträge zum Thema: | Zur Liste |
<form action="/cgi-bin/baseportal.pl?htx=/auktion/gebot" method=post enctype="multipart/form-data"> <input type="hidden" name="cmd=" value="add">
<perl> #- - - abfrage, ob user registriert ist - -#
{ get "Login==!$Login", "reg";
if($Passwort ne "" && $Passwort eq $pwrein)
#- - - datumsvergleich ob jetzt noch im auktionszeitraum liegt, falls ja speichern - -# get "", "auktiondb"; $vergl_datum = datum("jetzt", "intern"); if(Beginn lt $vergl_datum && $Ende gt $vergl_datum) {
{ if ($cmd eq "add") { put undef, "gebotedb"; } elsif ($cmd eq "mod") { mod undef, "gebotedb"; } }
do_all "db=gebotedb input=no", "Login", "pwrein";
} else {
out "Zeit schon vorbei";
$namerein=""; } } } </perl>
if(Beginn lt $vergl_datum && $Ende gt $vergl_datum)
if($Beginn lt $vergl_datum && $Ende gt $vergl_datum)
get "", "auktiondb";
...wenn ich das noch wüßte ;-)
get "Online==1", "auktiondb";
<perl> #- - - abfrage, ob user registriert ist - -# if($Login ne "")
get "Login==!$Login", "reg";
if($Passwort ne "" && $Passwort eq $pwrein) {
get "Online==1", "auktiondb"; $vergl_datum = datum("jetzt", "intern"); if(Beginn lt $vergl_datum && $Ende gt $vergl_datum && $cmd eq "add" && $_put{feldnamedesneuenangebotes} gt $aktuellesangebotderDB) { if (%_put )
if ($cmd eq "add") { put undef, "gebotedb"; } elsif ($cmd eq "mod") { mod undef, "gebotedb"; } }
do_all "db=gebotedb input=no", "Login", "pwrein";
} else {
out "Zeit schon vorbei";
$namerein=""; } } } </perl>
Liste der Einträge von 6900 bis 7050: | 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 |