APL Wiki|
Size: 2381
Comment: Navigation added
|
Size: 2381
Comment: Navigation added
|
| Deletions are marked like this. | Additions are marked like this. |
| Line 3: | Line 3: |
| <<Navigation(siblings)>> | <<Navigation(children)>> |
| Line 57: | Line 57: |
| <<Navigation(siblings)>> | <<Navigation(children)>> |
MildServer Samples: The Index Page
The front page of the MildServer (which you can see by directing your browser to http://localhost:8080) is implemented by the file called index.dyalog in the Demo folder. It looks like this:
:Class Index : MildPage
:Include #.HTMLInput
∇ Render req;html;links;hdr
:Access Public
hdr←'h2'Enclose'Welcome to MildServer'
html←#.Files.GetText req.Server.Root,'welcome.txt'
req.Return hdr,'p' Enclose html
∇
:EndClassThe front page is essentially a static page - it is not interactive and does not change, so it could have been implemented using a simple HTML text file. It is only implemented as a scripted page in order to provide a very simple example to discuss.
The HTMLInput class is included so that we can use the Enclose function to wrap the header in an 'h2' (header level 2) tag, and the body text in a 'p' (paragraph) tag. The body text itself is retrieved from the file welcome.txt. Finally, the HTML is passed to req.Return, producing the following output:
The HTML returned is the following (the html and body tags and the head section are added by the Wrap method in the class defined by Code\DemoServer.dyalog Class):
<html><head> <title>Demo Server</title> <link href="/Styles/Style.css" rel="stylesheet" type="text/css"> </head> <body><h2>Welcome to MildServer</h2> <p><i>Anyone who can write an APL function should be able to make it available on the Internet.</i><br><br> This is the goal of the <a href="http://aplwiki.com/MildServer">MildServer Project</a>. You can read more about the project and download source code from the <a href="http://aplwiki.com">APL Wiki</a>.<br><br> Click on one of the following links to run MildServer sample pages: <ul> <li><a href="/reverse?Name=Beethoven">Roll over Beethoven!</a></li> <li><a href="/mmind/MMind.dyalog?">Animal Mastermind</a></li> <li><a href="/linreg">Linear Regression</a></li> <li><a href="Admin/httprequest">HTTPRequest Content Demo</a></li> <li><a href="Admin/sessioninfo">SimpleSession Information Demo</a></li> </ul> </p> </body></html>
Return to the main MildServer page.