eXept Software AG Logo

Smalltalk/X Webserver

Smalltalk Dynamic Web Pages - Source of WebDemoApp1-timeNow:

Home

Documentation
www.exept.de
Everywhere
for:
timeNow:aRequest
    "a very simple reply: shows the current time.

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

    |replyPresenter|

    replyPresenter := aRequest replyPresenter.
    replyPresenter title:'Server Time Example'.
    replyPresenter parametersAt:#secondHeadLine put:'TimeNow: Server Time Example'.
    aRequest
        nextPutLine:'<h1>Server Time Example</h1>';
        nextPutLine:'The servers time is ' , Time now printString.

    self addLinksForSource:#'timeNow:' previous:#'testGoogle:' next:nil to:aRequest.

Edit
Index


ST/X 7.2.0.0; WebServer 1.670 at bd0aa1f87cdd.unknown:8081; Tue, 19 Mar 2024 11:16:36 GMT