Thread if anweisung (16 answers)
Opened by Kathrin at 2005-01-24 12:34

Kathrin
 2005-01-24 15:00
#51207 #51207
User since
2004-12-15
158 Artikel
BenutzerIn
[default_avatar]
hab mal bisschen rumgespielt :D
ich wollte nen merker setzen, wenn die if anweisung durchgeführt wird.
doch irgend was hab ich falsch gemacht...
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
sub tab_einf  {
       &check_doctype();
       my $dbh = DBI->connect($DBN,$DBUSER,$DBPASS) or die $DBI::errstr;

       my $statement_insert="INSERT INTO $TABELLE VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)";
       my $sth_insert=$dbh->prepare($statement_insert) or die $DBI::errstr;
       my $de="0";
       my $en="0";
       my $fr="0";

     if ($head_de && $deutsch && ($check1 || $check2 || $check3 ||$check4) && $ersteller && $werk)
       {
               do_sth1();
               $de="1";
       }
    if ($head_en && $englisch && ($check1 || $check2 || $check3 ||$check4) && ersteller && $werk)
       {
                   do_sth2();
                   $en="1";
       }
       if ($head_fr && $franz && ($check1 || $check2 || $check3 ||$check4) && $ersteller && $werk)
       {
                     $do_sth3();
                     $fr="1";
       }
       if ($de="0" && $en="0" && $fr="0")  {          #Zeile 171
               &warnung();
       }
       else  {
               &ausgabe();
       }
       $sth_insert->finish();
       $dbh->disconnect();
       }

es kommt immer folgende fehlermeldung: Software error:
Can't modify constant item in scalar assignment at /usr/local/httpd/cgi-bin/frontl.cgi line 171, near ""0")  "
Execution of /usr/local/httpd/cgi-bin/frontl.cgi aborted due to compilation errors.


EDIT: alles klappt wunderbar, bis auf die ausgabe von &ausgabe und &warnung...
ich will eigentlich nur, dass wenn nicht in die if anweisungen gesprungen wird, warnung() ausgegeben wird. und wenn in irgend eine if anweisung gesprungen wird, sei es auch nur eine, dann soll ausgabe() ausgegeben werden\n\n

<!--EDIT|Kathrin|1106571810-->

View full thread if anweisung