File: example3a.adp.txt

package info (click to toggle)
aolserver4 4.5.1-12
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 11,768 kB
  • ctags: 14,788
  • sloc: ansic: 45,120; tcl: 5,532; sh: 1,021; makefile: 379; pascal: 219; php: 13
file content (25 lines) | stat: -rw-r--r-- 473 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
 <HTML>
 <HEAD>
<TITLE>DB Example</TITLE>
 </HEAD>
 <BODY>
 <H1>
DB Example
 </H1>
 <P>
 Select a db table from the default db pool:
 <FORM METHOD=POST ACTION=db2.adp>
<SELECT NAME=Table>
 <%
 set db [ns_db gethandle]
 set sql "select * from tables"
 set row [ns_db select $db $sql]
 while {[ns_db getrow $db $row]} {
set table [ns_set get $row name]
ns_puts "<OPTION VALUE=\"$table\">$table"
 }
 %>
</SELECT>
<INPUT type=submit value="Show Data">
 </FORM>
 </BODY></HTML>