eXept Software AG Logo

Smalltalk/X Webserver

Smalltalk Dynamic Web Pages - Source of WebDemoApp1-test1:

Home

everywhere
www.exept.de
for:
test1:aRequest
    "a simple reply, with an URL refering to another method inside myself.

     Invoke via the browser as URL:
        host:port/<N>,test1:
     where <N> is the registered name of this service.
    "

    |replyPresenter|

    replyPresenter := aRequest replyPresenter.
    replyPresenter title:'Hello world Example'.
    replyPresenter parametersAt:#secondHeadLine put:'Test1: Hello world Example'.
    aRequest
        nextPutLine:'<h1>Hello World</h1>'.

Edit
Index


ST/X 7.1.0.0; WebServer 1.653 at exept.de:8081; Fri, 15 Dec 2017 15:56:00 GMT