INetCommand.Start

Синтаксис

Start(Var Value: Variant);

Параметры

Value. Данные или запрос, отправляемые сетевому ресурсу для обработки.

Описание

Метод Start инициализирует отправку указанного запроса сетевому ресурсу.

Комментарии

При выполнении POST-запросов в параметре Value указывается SOAP-запрос, который будет обработан сервером.

При выполнении GET-запросов в параметре Value может быть передана пустая строка, а параметры выполнения указываются в строке адреса сетевого ресурса.

При завершении выполнения запроса результат выполнения будет доступен в свойстве Result.

Пример

Для выполнения примера предполагается наличие развёрнутого BI-сервера «Форсайт. Аналитическая платформа».

Добавьте ссылку на системную сборку Net.

Sub UserProc;
Var
    Service: INetHttpService;
    Cmd: INetCommand;
    HttpCmd: INetHttpCommand;
    Request: Variant;
    Response, Id: string;
Begin
    Service := New NetHttpService.Create;
    Service.Url := "http://localhost:9090/axis2/services/PP.SOM.Som";
    Cmd := Service.Connect;
    HttpCmd := Cmd As INetHttpCommand;
    HttpCmd.Command := NetHttpCommandType.Post;
    HttpCmd.AcceptLanguage := "ru";
    Request := "<OpenMetabase>" +
        "<tDef><id>griva_p5</id></tDef>" +
        "<tCreds><user><id>sa</id></user><pass>Qwerty1</pass></tCreds>" +
        "</OpenMetabase>" ;
    Cmd.Start(Request);
    Response := Cmd.Result As String;
    Id := Response.SubString(Response.IndexOf("<id>") + 4, Response.IndexOf("</id>") - Response.IndexOf("<id>") - 4);
    Debug.WriteLine(Id);
    Request := "<CloseMetabase><tMb><id>" + id + "</id></tMb></CloseMetabase>";
    Cmd.Start(Request);
End Sub UserProc;

При выполнения примера осуществляется подключение к BI-серверу. BI-серверу будет направлен запрос на открытие соединения с репозиторием, полученный моникёр соединения будет выведен в консоль среды разработки. После этого отправляется запрос на закрытие соединения с репозиторием.

См. также:

INetCommand