Пособие по написанию WAP-сайтов




Рассмотрение Реrl-сценария RealEstateWML.pl - часть 2


if (($Price2 &gt= $PriceLow) && ($Price2 &lt= $PriceHigh)) { $Option = $Option . "&ltoption onpick=\"../RealEstate/LV01234.wml \"&gtLV01234 \$\$149,995&lt/option&gt"; }

if (($Price3 &gt= $PriceLow) && ($Price3 &lt= $PriceHigh)) { $Option = $Option . "&ltoption onpick=\"../RealEstate/LV77711.wml \"&gtLV77711 \$\$249,995&lt/option&gt"; }

if (($Price4 &gt= $PriceLow) && ($Price4 &lt= $PriceHigh)) { $Option = $Option . "&ltoption onpick=\"../RealEstate /BC01234.wml\"&gtBC01234 \$\$500,000&lt/option&gt"; }

if (($Price5 &gt= $PriceLow) && ($Price5 &lt= $PriceHigh)) { $Option = $Option . "&ltoption onpick=\"../RealEstate /LV11711.wml\"&gtLV11711 \$\$1,500,000&lt/option&gt"; }

if ($Option eq "")

{ $Deck = "Content-type: text/vnd.wap.wml

&lt?xml version=\"1.0\"?&gt &lt!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\"&gt

&ltwml&gt

&lthead&gt

&ltmeta http-equiv=\"Cache-Control\" content=\"max-age=0\" forua=\"true\"/&gt

&lt/head&gt

&ltcard id=\"Error\"&gt

&ltdo type=\"accept\" label=\"Back\"&gt &ltgo href=\"../RealEstate /RealEstate.wml\" /&gt &lt/do&gt

&ltp align=\"left\" mode=\"wrap\"&gt

No houses match the price range.

&lt/p&gt

&lt/card&gt

&lt/wml&gt"; }

else

{ $Deck = "Content-type: text/vnd.wap.wml

&lt?xml version=\"1.0\"?&gt &lt!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\"&gt

&ltwml&gt

&lthead&gt

&ltmeta http-equiv=\"Cache-Control\" content=\"max-age=0\" forua=\"true\"/&gt




Содержание  Назад  Вперед