get "Deutsch==$Deutsch_me sort=Deutsch,English ", "$dbname";
if ($_amount > 1 )
{
get "Deutsch==$Deutsch_me sort=Deutsch,English ", "$dbname";
while(get_next("$dbname"))

get "Deutsch==$Deutsch_me sort=Deutsch,English ", "$dbname";
while(get_next("$dbname"))

$dbname="vokabeln6";  ##!!!Strings ins "" schreiben
out <<EOF;
<table border="1" >
  <tr>
    <td width="50">Nr</td>
    <td width="50">Thema</td>
    <td >Deutsch</td>
    <td >Englisch</td>
  </tr>
EOF
get "Deutsch~=Abfall sort=Deutsch,English ", "$dbname","erg";#Eingegrenzt zum Test (Abfall ist doppelt)
while(get_next("erg"))
{
$Deutsch_me=$Deutsch ;
get "Deutsch==$Deutsch_me sort=Deutsch,English ", "$dbname";
while(get_next("$dbname"))
{
out "<tr><td >$Id</td><td >$Thema</td><td ><b>$Deutsch";
out "<font color='#0000FF'> |</font> $Deutsch2" if ($Deutsch2 ne "");
out "<font color='#0000FF'> |</font> $Deutsch3" if ($Deutsch3 ne "");
out "</b>";
out " ($Deutsch_e)" if ($Deutsch_e ne "");
out "</td><td ><b>$English</b>";
out " ($English_e)" if ($English_e ne "");
out "</td></tr>";
}
}
out "</table>";