Danke ahe,
Irgendwas fehlt mir aber???
Es funktioniert bei mir nicht
http://www.woll-insel.at/cgi-bin/shop2/iboshop.cgi?show1200004230<!--spmacro:module(marke)
sub listmarke {
my $anz = $_[1];
my $t;
my $i=0;
my %TEST =();
main::mprint("<select name=Marke>");
while ($i <= $anz)
{
$t =ssp::get_var_article('MARKE',$i);
if (!defined ($TEST{$t})) {
$text = qq{<option value="$t">$t</option>\n};
main::mprint($text);
$TEST{$t} =1;
}
++$i;
}
main::mprint("</select>");
}
sub marke {
my $count = ssp::readSQLData("SELECT MARKE FROM PY2_ITEM","MARKE");
if ($count >= 0) {
my $i=0;
while ($count > $i) {
$marke = ssp::get_var_db("MARKE",$i);
main::mprint(" $marke<br>\n");
++$i;
}
} else {
my $errtext = ssp::get_last_sqlerr();
main::mprint("Fehler beim DB Zugriff: $errtext<br>\n");
}
}
-->
ich kann zwar mit __marke::marke__ die DB nach benutzerdef. Feld "MARKE" abfragen aber ich bringe es nicht in die Listbox
habe versucht, das Skript anzupassen:
$t =ssp::get_var_article('ergaenz1',$i); - die Marke steht bei mir in ben. def. Feld MARKE -
$t = ssp::get_var_article("MARKE",$i);was bedeutet z.B. die Zeile
my %TEST =();muß ich nicht %TEST irgendwie definieren?
mal wieder ratlos
Autor
