<?stt
|path source|
path := sttFilePath pathName.
source := path asFilename contents asString.
?>
<!-- $Header: /cvs/stx/stx/goodies/webServer/data/comancheSTT/reflection.stt,v 1.6 2003/09/16 22:55:09 cg Exp $ -->
<html>
<head>
<title>Reflection (STT-Demo)</title>
</head>
<body>
The STT service is registered under the link: <b><?stt response nextPutAll:service linkName. ?></b>.
<br/>
The code to generate this page was from the file:
<b>"<?stt response nextPutAll: path. ?>"</b>, which contains:
<table BORDER="0" WIDTH="100%" BGCOLOR="#CCCCCC">
<tr><td>
<code><pre>
<?stt response nextPutAll:(HTTPServer withSpecialHTMLCharactersEscaped:source). ?>
</pre></code>
</td></tr>
</table>
<hr><address>Served by your friendly <a href=http://www.exept.de>ST/X WebServer</a></address>
</body>
</html>
|