r7093: - added a new Form() ejs object for producing simple forms.
[gd/samba/.git] / swat / esptest / formtest.esp
1 <% page_header("columns", "ESP Form Test"); %>
2
3 <%
4 var f = Form("FormTest", 2, 2);
5 f.element[0].label = "First Name";
6 f.element[0].name  = "firstName";
7 f.element[1].label = "Last Name";
8 f.element[1].name  = "lastName";
9 f.submit[0] = "OK";
10 f.submit[1] = "Cancel";
11
12 display_form(f);
13
14 <%
15   /* if its a post then the user has filled in the form, so
16      report the values 
17   */
18   if (form['OK']) {
19 %>
20   You chose firstName=@@form['firstName'] lastName=@@form['lastName']<p>
21   
22 <%
23    simple_table(form);
24   }
25 %>
26
27 <% page_footer(); %>