Аргерих Л. О языке РНР. Часть 5. Страница 124


• method HAW_deck([string title, int alignFlag])

Конструктор класса HAW_deck. Названием может быть любая строка, а флаг принимает одно из значений HAW_ALIGN_LEFT, HAW_ALIGN_CENTER или HAW_ALIGN_RIGHT, по умолчанию HAW_ALIGN_LEFT.

• function add_text(objecc HAW_text)

Добавляет объект HAW_text в HAW__dech и показывает его при генерации страницы.

• function

Добавляет объект HAW_image в HAW_dec!< и показывает его при генерации страницы.

• functionadd_table(objectHAW_table)

Добавляет объект HAW_table в HAW_decH и показывает его при генерации страницы.

• function

Добавляет объект HAW_fопт в HAW_decH и показывает его при генерации страницы.

• function add._link(object HAW_link).

Добавляет объект HAW_1 ink в HAW_deck и показывает его при генерации страницы.

• function add_linkset(object HAW_linkset)

Добавляет объект HAW_linkset в HAW_deck и показывает его при генерации страницы.

31 Зэк. 989

$page->add_form($form);

$page->create_page();

?>

В нашем файле submit.wml потребуется следующий код. Мы не создали файл homepage.wml для пользователей беспроводных устройств - его разработка может стать хорошим упражнением.

Кроме того, в этом коде предполагается, что в файле php л ni включена regis- ter_globals. Если это не так, надо либо включить ее, либо воспользоваться $HTTP_GET_VARS[ '$variable' ] вместо тех переменных, которые фигурируют ни­же в командах If:

<?

include("hawhaw.inc");

$page = new HAW_deck("E-Mail Submission");

if (!{name) {

$text = new HAW_text("You must input your name."); $text->set_br(1);

$link = new HAW_link("Back", "input.wml"};

$page->add_text($text);

$page->add_link($link); $page->c reate_page();

exit;

}

if {!{email) {

$text = new HAW_text("You must input your email addy."); $text->set_br(1);

Slink = new HAW_link("Back", "input.wml");

$page->add_text($text); $page->add_link(Slink); Spage->create_page();

exit;

}

if (!{comment) {

$text = new HAW_text("Please tell us what you think!"); Stext->set_br(1);

$link = new HAW_iink("Back", "input.wml");

$page->add_text($text);

Spage->add_link($link);

$page->c

exit;

$body .= "Name: $name\n"; $body ..= "E-Mail: $email\n\n"; $body . - "Comments:\n$comment\n";

mailOdevon@sitetronics.com'', "WAPMail", $body, "From: $email");

$text = new HAW_text("T!ianl- you for your incut!"); $text->set br(1);