Opened by zipster at 2006-05-12 11:34
User since
2004-09-06
458 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-09-06
458 Artikel
BenutzerIn
Ne an Encode oder Decode liegts nicht.
Hab den Fehler gefunden. Es liegt an der Befühlung. Im Interface ziegt ers richtig an aber bei nem Print merkt man das es eigentlich nur eine Referenz ist.
Hab aber keine Ahnung wie ichs lösen soll. Vieleicht habt ihr ne Idee...
Wenn ich folgendes übergebe funktioniert es...
Hab den Fehler gefunden. Es liegt an der Befühlung. Im Interface ziegt ers richtig an aber bei nem Print merkt man das es eigentlich nur eine Referenz ist.
Hab aber keine Ahnung wie ichs lösen soll. Vieleicht habt ihr ne Idee...
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
my @choices_spalte = lies_tabellen_zeilen($dbh, "adresstyp", "beschreibung");
...
if ($browse eq "BrowseEntry"){
$feld->insert('end',$_) for (@choices_spalte);
}
...
sub lies_tabellen_zeilen{
my ($dbh, $tabellen_name, $spalten_name) = @_;
my $sth_typ =$dbh->prepare ("select $spalten_name from $tabellen_name");
$sth_typ->execute();
my $ref_typ = $sth_typ->fetchall_arrayref ();
#chomp($ref_typ);
$sth_typ->finish();
return (\@{$ref_typ});
}
Wenn ich folgendes übergebe funktioniert es...
Code: (dl
)
$choices_spalte->[1]->[0]
