File: test2.adp

package info (click to toggle)
aolserver 3.4.2-1
  • links: PTS
  • area: main
  • in suites: woody
  • size: 22,692 kB
  • ctags: 33,612
  • sloc: ansic: 171,340; tcl: 10,218; sh: 3,821; cpp: 2,779; makefile: 2,041; yacc: 1,648; perl: 456; php: 13
file content (41 lines) | stat: -rw-r--r-- 614 bytes parent folder | download | duplicates (9) 
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
<HTML>

<HEAD>
<TITLE>AOLserver Confidence Test</TITLE>
</HEAD>

<BODY BGCOLOR="#ffffff">

<H2>Test 2</H2>

$Header: /cvsroot/aolserver/aolserver/tests/adp/test2.adp,v 1.1 2000/10/09 20:29:54 kriston Exp $

<P>

Complex Tcl commands will be run:

<HR>

Do a foreach with ns_set:
<BR>

<%

set myset [ns_set create "My Set"]

foreach thing { one two three four } {
    ns_set put $myset item${thing} "Thing number $thing."
}
ns_puts "the set is [ns_set size $myset] elements large"

for { set i 0 } { $i < [ns_set size $myset] } { incr i } {
    ns_puts "<BR>[ns_set value $myset $i]"
}

%>

<HR>


</BODY>
</HTML>