baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
################################################################ # Aktionen je nach Übergabeparametern und Werten von _chk_zugang ################################################################# $a_debug.= "<b>DB-Aktionen - Subroutinen f.\$use ($use) dyn. aufbauen</b><br>"; if ($use ne "" && $zug == 4) {$a_debug.=".\$use($use) vorhanden - Aktionsauswahl:<br>"; # -------- Aktionen in Datenbanken je nach $act ------- # my $db_name = substr($use, 2); if ($act eq "n") { put undef ,"$db_name"; $act = "n"; # zurücksetzen, damit Form geleert wird # $act = "c" if $db_name eq "$db1"; $a_actiontext = "Datensatz hinzugefügt..."; $a_actionalert = "alert('Datensatz gespeichert !');"; $a_debug.=".. put (in db $db_name) ausgeführt<br>"; }elsif ($act eq "c" && $dsn ne "") { mod "Id==!$dsn", undef, "$db_name"; $act = "n"; # zurücksetzen, damit Form geleert wird $a_actiontext = "Datensatz geändert..."; $a_actionalert = "alert('Datensatz geändert !');"; $a_debug.=".. chg (in db $db_name) ausgeführt<br>"; }elsif ($act eq "d" && $dsn ne "") { del "Id==!$dsn", "$db_name"; $act = "n"; # zurücksetzen, damit Form geleert wird # $act = "c" if $db_name eq "$db1"; $a_actiontext = "Datensatz gelöscht..."; $a_actionalert = "alert('Datensatz gelöscht !');"; $a_debug.=".. del (in db $db_name) ausgeführt<br>"; } }elsif ($use ne "" && $act eq "r") # "Eingangszweig" f. Registrierungsaktionen
Alle Einträge zum Thema: | Zur Liste |
################################################################ # Aktionen je nach Übergabeparametern und Werten von _chk_zugang ################################################################# $a_debug.= "<b>DB-Aktionen - Subroutinen f.\$use ($use) dyn. aufbauen</b><br>"; if ($use ne "" && $zug == 4) {$a_debug.=".\$use($use) vorhanden - Aktionsauswahl:<br>"; # -------- Aktionen in Datenbanken je nach $act ------- # my $db_name = substr($use, 2); if ($act eq "n") { put undef ,"$db_name"; $act = "n"; # zurücksetzen, damit Form geleert wird # $act = "c" if $db_name eq "$db1"; $a_actiontext = "Datensatz hinzugefügt..."; $a_actionalert = "alert('Datensatz gespeichert !');"; $a_debug.=".. put (in db $db_name) ausgeführt<br>"; }elsif ($act eq "c" && $dsn ne "") { mod "Id==!$dsn", undef, "$db_name"; $act = "n"; # zurücksetzen, damit Form geleert wird $a_actiontext = "Datensatz geändert..."; $a_actionalert = "alert('Datensatz geändert !');"; $a_debug.=".. chg (in db $db_name) ausgeführt<br>"; }elsif ($act eq "d" && $dsn ne "") { del "Id==!$dsn", "$db_name"; $act = "n"; # zurücksetzen, damit Form geleert wird # $act = "c" if $db_name eq "$db1"; $a_actiontext = "Datensatz gelöscht..."; $a_actionalert = "alert('Datensatz gelöscht !');"; $a_debug.=".. del (in db $db_name) ausgeführt<br>"; } }elsif ($use ne "" && $act eq "r") # "Eingangszweig" f. Registrierungsaktionen
$namerein =() / $pwrein =() / $nick =(admin) Statusvariablen: $logout =(0) / $zug =(4) Aktionsparameter: $use =(a_nutzer) / $act =(c) / $act1=()
Liste der Einträge von 40050 bis 40200: | 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 |