I
Irfan
Guest
Hi Eduardo, I wrote similar code to get an image(almost 2MB of size) from the WebHandler and it worked fine. Please find below the code I used using OpenEdge.Core.Memptr. using OpenEdge.Net.HTTP.ClientBuilder. using OpenEdge.Net.HTTP.IHttpClient. using OpenEdge.Net.HTTP.RequestBuilder. using OpenEdge.Net.HTTP.HttpClient. using OpenEdge.Net.HTTP.IHttpRequest. using OpenEdge.Net.HTTP.IHttpResponse. using OpenEdge.Net.HTTP.Credentials. USING OpenEdge.Net.HTTP.HttpHeader FROM PROPATH. USING OpenEdge.Core.ByteBucket FROM PROPATH. /* ******************** PREPROCESSOR DEFINITIONS ******************** */ DEFINE VARIABLE oReq AS IHttpRequest NO-UNDO. DEFINE VARIABLE OResp AS IHttpResponse NO-UNDO. def var oImage as class memptr NO-UNDO. define variable oCreds as Credentials no-undo. def var oHeader as HttpHeader no-undo. def var oBody as ByteBucket. oBody = new ByteBucket(). oHeader = new HttpHeader("Accept","image/jpg"). oCreds = new Credentials('application', 'tomcat', 'tomcat'). oReq = requestbuilder :get("http://localhost:4511/AccessImage/web/getimage?imageId=bill123") :request. oReq:SetHeader(oHeader). oResp = HttpClient:Instance():Execute(oReq). oBody = cast(oResp:Entity,ByteBucket). oImage = oBody:GetBytes(). message oResp:statuscode view-as alert-box. copy-lob from oImage:value to file "C:/OpenEdge/WRK/temp.jpg".
Continue reading...
Continue reading...