File: sld010.htm

package info (click to toggle)
aolserver4 4.5.1-15.1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 11,772 kB
  • sloc: ansic: 45,120; tcl: 5,532; sh: 1,021; makefile: 380; pascal: 219; php: 13
file content (59 lines) | stat: -rw-r--r-- 1,556 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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59

<!--  Presentation generated by Internet Assistant for Microsoft PowerPoint 97 -->

<HTML>
<HEAD>

<meta name="GENERATOR" content="Microsoft Internet Assistant for Microsoft PowerPoint 97">
 <TITLE>Example: CGI-style Request Procedures</TITLE> 
</HEAD>

<BODY     >

<CENTER>
<TABLE WIDTH=100%> 
     <TR> <TD WIDTH=100% ALIGN=CENTER>
         <A HREF="sld001.htm">First</A>&nbsp;&nbsp;
         <A HREF="sld009.htm">Previous</A>&nbsp;&nbsp;
         <A HREF="sld011.htm">Next</A>&nbsp;&nbsp;
         <A HREF="sld077.htm">Last</A>&nbsp;&nbsp;
&nbsp;&nbsp;         <A HREF="index.htm">Index</A>&nbsp;&nbsp;
         <A HREF="tsld010.htm">Text</A>&nbsp;&nbsp;
     </TD> </TR>
     <TR> <TD WIDTH=100% ALIGN=CENTER>
         <IMG SRC="img010.gif" usemap="#Objmap" WIDTH=600 HEIGHT=450 BORDER=0>
     </TD> </TR>
</TABLE>
<P>Slide 10 of 77</P>
</CENTER>
<!-- <UL>
<H2>Example: CGI-style Request Procedures</H2>
</UL></P>
<P><UL>
<LI><H2>ns_register_proc binds procs to arbitrary requests:</H2>
</UL></P>
<P><UL>
ns_register_proc GET /demo/time getTime
</UL><UL>

</UL><UL>
proc getTime {} {
</UL><UL>
  set headers [ns_conn headers]
</UL><UL>
  set browser [ns_set iget $headers User-Agent]
</UL><UL>
  set page &#060html&#062&#060body&#062\n
</UL><UL>
  append page Time: [clock seconds]&#060br&#062\n
</UL><UL>
  append page Browser: $browser\n
</UL><UL>
  append page &#060/body&#062&#060/html&#062
</UL><UL>
  ns_return 200 text/html $page
</UL><UL>
}</UL></P>
<P>  -->
</Body>
</HTML>