Упс, нестыковочка вышла. Действительно, StartHttpServer есть только в KeepRemote, а Http ее нет. Но StartHttpServer проста:

## Код:
```
TYPE Servlet = POINTER TO RECORD (HttpServers.Servlet) ... END;
   VAR server: HttpServers.Server;
   PROCEDURE StartHttpServer* (IN protocol, localAdr, prefix: ARRAY OF CHAR);
      CONST methods = { HttpServers.METHOD_GET, HttpServers.METHOD_PUT, 
         HttpServers.METHOD_DELETE, HttpServers.METHOD_PATCH };
      VAR servlet: Servlet;
   BEGIN
      IF server = NIL THEN server := Http.NewServer() ELSE server.Stop END;
      NEW(servlet);
      server.RegisterServlet(servlet, prefix, methods);
      server.Start(protocol, localAdr);
   END StartHttpServer;   (* "KeepRemote.StartHttpServer('CommTCP', '0.0.0.0:1081', '/BB/')" *)
```


Чтобы раздавать файлы через Http (т.е. по сути веб-сервер организовать), воспользуйтесь HttpWeb.Servlet. Чтобы на произвольный порт его повесить, смотрите на строки инициализации в примере.

> -- ddn1 писал(а):
> Вообще, язык html-запросов, это какой-то маразм. Зачем он нужен?
Вот чтобы его заменить там, где он неуместен, я делал KeepRemote: чтобы вызывать из ББ1  процедуры в ББ2 и получать результаты обратно в ББ1. Но - пока не достаточно оттестировал и не опубликовал.