Hi

I am trying out modules and wonder if anybody could tell me why this do not work:

procedure TExampleDataModule.EWBModuleExecute(Request: TEWBServerRequest);
begin
   { Fill in the module execution code here. You can have a single
    module handle multiple parameters, etc.  Use the Request.RequestURL and
    Request.RequestURLParams/Request.RequestParams to determine which
    parameters were passed into the module for the request. }

    with Request do SendContent('Resultat1',200,'OK');

    NtsRed;
end;



I think the prog must have 'arrived' in the module as Page1 echoes back 'Resultat1'.

but nothing more happens.  NtsRed is an ordinary procedure (Delphi XE6) and when done,
the module shoud just exit back to the calling prog. (Nothing except for an OK if successful as NtsRed
does all the there is to do: (reducing a jpg and writing it to a blobfield after reduction.

Is there a  way to trigger this procedure?

Nils

Nils Sorensen wrote:

Hi

I am trying out modules and wonder if anybody could tell me why this do not work:

procedure TExampleDataModule.EWBModuleExecute(Request: TEWBServerRequest);
begin
   { Fill in the module execution code here. You can have a single
    module handle multiple parameters, etc.  Use the Request.RequestURL and
    Request.RequestURLParams/Request.RequestParams to determine which
    parameters were passed into the module for the request. }

    with Request do SendContent('Resultat1',200,'OK');

    NtsRed;
end;



I think the prog must have 'arrived' in the module as Page1 echoes back 'Resultat1'.

but nothing more happens.  NtsRed is an ordinary procedure (Delphi XE6) and when done,
the module shoud just exit back to the calling prog. (Nothing except for an OK if successful as NtsRed
does all the there is to do: (reducing a jpg and writing it to a blobfield after reduction.

Is there a  way to trigger this procedure?

Nils

Hi

Problem solved please ignore this post

Nils