<?php
/*
* Harris WapChat
*
* http://www.successkid.com
*
* Harris WapChat is a wap chat application for personal and corporate used.
* Visit {@link http://www.successkid.com} for more info.
* Copyright (C) 2005 Harris Yusuf Arifin
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* @author Harris Yusuf Arifin <[email protected]>
* @copyright Copyright 2005, Harris Yusuf Arifin
*
* Please support this software by send DONATION to E-GOLD account :
* E-gold Number : 827550
* E-gold Name : earthweb egold
*/
include("$sysFileDir".FILE_HEAD_TYPE);
include("$sysFileDir".FILE_HEADER_WML);
echo "<wml>\n";
echo "<card title=\"".$txt_crtroom."\">\n";
echo "<onevent type=\"onenterforward\">\n";
echo " <refresh>\n";
echo " <setvar name =\"a\" value=\"$listAd[0]\"/>\n"; //adn
echo " <setvar name =\"b\" value=\"$listAd[4]\"/>\n"; //atx
echo " <setvar name =\"d\" value=\"$adid\"/>\n"; //adid
echo " <setvar name =\"g\" value=\"$listAd[3]\"/>\n"; //adwrap
echo " </refresh>\n";
echo "</onevent>\n";
echo "<p align=\"left\">";
echoinput($txt_adname,"a","","","16",$sesUserAgent);
echoinput($txt_adtext,"b","","","",$sesUserAgent);
echo $txt_wrap.": <select name=\"g\">\n";
echo " <option value=\"1\">".$txt_yes."</option>\n";
echo " <option value=\"0\">".$txt_no."</option>\n";
echo "</select><br/>\n";
$go = "<go method=\"post\" href=\"".FILE_CENTER_POINT."?c=".CHOICE_AD_EDIT_SAVE."&d=$adid\">\n";
$go .= " <postfield name=\"a\" value=\"$(a)\"/>\n";
$go .= " <postfield name=\"b\" value=\"$(b)\"/>\n";
$go .= " <postfield name=\"f\" value=\"$(f)\"/>\n";
$go .= " <postfield name=\"g\" value=\"$(g)\"/>\n";
$go .= " </go>\n";
navigate($txt_edit,$txt_edit,"accept",$go,$sesUserAgent);
$go = "<prev/>\n";
navigate($txt_back,$txt_back,"prev",$go,$sesUserAgent);
echo "</p>";
echo "</card>\n";
echo "</wml>\n";
?>