Hallo,
habe nun eine andere Variante probiert:
Die Suchmaske als "normales" WML-Template, das funzt soweit:
<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<card id="BestGuide" title="WAP-BestGuide">
<p>
Geben Sie bitte den gewünschten Suchbegriff ein:
<input type="text" name="Suchbegriff" title="Suchbegriff" value="" />
<br/>
<anchor>
<go href="http://baseportal.de/cgi-bin/bbeta.pl?htx=/gpark/bg/wap_gastro3" method="post">
<postfield name="Suchbegriff" value="\$(Suchbegriff)" />
</go>
</anchor>
</p>
<p>- zum <a href="http://www.bestguide.de/wap/index.wml">Menu</a></p>
der eingegebene Suchbegriff wird aber irgendwie nicht mitgeschleift, denn in baseportal zeigt er all Sätze an:
<perl>
$_header="Content-type: text/vnd.wap.wml\n\n";
</perl>
<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<card id="BestGuide" title="WAP-BestGuide">
<p><b>BESTGUIDE</b> Gastronomie</p>
<loop db=/gpark/bg/bgdata dtyp=="G" & dfirmnam~=$Suchbegriff sort=dtyp,dbranche,dfirmnam,dstrasse range^=0,5>
$dbranche<br/>$dfirmnam<br/>$dstrasse<br/><br/>
</loop>
<perl>
my $newrange=$_range+$_range_length;
my $oldrange=$_range-$_range_length;
$oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;
out "[ <a href=\"$_link&range=$oldrange,$_range_length\">Zurück</a> ] " if $oldrange>=0;
out "[ <a href=\"$_link&range=$newrange,$_range_length\">Weiter</a> ]" if $newrange<$_amount_all;
</perl>
<p>- zum <a href="http://www.bestguide.de/wap/index.wml">Menu</a></p>
</card>
