Search Results

'Returns the number of bytes skipped Sub SkipNBytes (Input As InputStream, N As Int) As Int Dim buffer(Min(N, 8000)) As Byte Dim count As Int Do While count < N Dim read As Int = Input.ReadBytes(buffer, 0, Min(buffer.Length, N - count)) If read = -1 Then Return count
link: We usually use job.GetInputStream in whole, e.g. to save it to a file as in the following code: Dim OutStream As OutputStream
link: "stream" says it all. how long is a stream anyway? i would just like the last 3000 liters of water from that stream that runs by my house, please.

Job.GetInputStream will not help here. The problem is that your server returns an error status. Use OkHttpUtils2 source code instead of the library and change hc_ResponseError in HttpUtils2Service to: Sub hc_ResponseError (Response As OkHttpResponse, Reason As String, StatusCode As Int, TaskId As
link: Have you had a look at Job1.GetInputStream, is there anything there?
link: Thanks Mark35at but I don't really know how to convert GetInputStream into a string. I'm more intermediate than expert in B4x.
link: Hello, I'm using jOkHttpUtils2 to send a PostString request to a custom Server (not coded by me and not in B4J). When I send the Post, I received an a

I don't understand why it needs to be so complicated. How I do is: Sub DownloadImage Dim job As HttpJob job.Initialize("", Me) job.Download("https://picsum.photos/200/300") Wait For (job) JobDone(job As HttpJob) If job.Success Then Dim inp As InputStream = job.GetInputStr
link: as an alternative, you could do the whole thing in b4x, eg: j.download("https://www.b4x..jpg") and then: If j.Success Then Dim inp

job.GetInputStream.ReadBytes(bytes,0,job.GetInputStream.BytesAvailable) For x = 0 To job.GetInputStream.BytesAvailable - 1 Log( Bit.And(bytes(x),255)) Log(ToUnsigned(bytes(x))) Next So in both cases I'm not seeing values that aren't text. I have a <9> in my
link: I go from here: job.GetInputStream.ReadBytes(bytes,0,job.GetInputStream.BytesAvailable) CallSub2(Starter, "SendMessage", bytes) T
link: For some reason when I have F0 (240) it comes out as -16.. Any ideas? Looks like we are only working with 127 Log(job.GetString)
link: good news... you can access the stream data at once. this is in B4J Sub Process_Globals Private fx As JFX Dim bytes(10000) As Byte End Sub Sub

I may be referring to the pdfium function to load from a stream, but I can't get it to work. Dim url As String = cdata.Get("pdfUrl") Dim job As HttpJob job.Initialize("DownloadPDF", Me) job.Download(url)

The error was this: Public Sub JobDone (Job As HttpResponse) it was success with: Public Sub JobDone (Job As HttpJob)
link: dylib <redacted> + 22 libdispatch.dylib + 1532 CoreFoundation <redacted> + 8 CoreFoundation <redacted> + 1590 CoreFoundation
link: Note that your code must check that Job.Success is true before it tries to access the data. However this is not related to the above error. Try to cl

Sir I have already done it but still not get any downloaded file.:( Sub JobDone (job As HttpJob) If job.JobName="job7" Then If job.Success Then Log(job.GetString) Dim out As OutputStream = File.OpenOutput(File.DirRootExternal, FileName, False) File.
link: Tip: if you are using B4A v7+: OkHttpUtils2 with Wait For You can use File.Copy2 with Job.GetInputStream to copy the file to wherever you like (don't
link: i´m not sure what is the issue here but you should not use a process global job. Sub Process_Globals End Sub Sub Global Dim FileName As String End Su
link: Hello sir, My code is Sub Process_Globals Dim job7 As HttpJob End Sub Sub Global Dim FileName As String End Sub Public Sub downLoadFile() F

Hallo Erel, thank you for your quick response. 1. I set a breakpoint and watched the variable xx. The buffer is empty (all bytes are 0, see attached screenshot). 2. The parser, which gets the result from the Service returns null.
link: Hallo there, I want to use the solution with HttpJob and HttpUtils2Service, which is provided as an example application by Erel. I built a .Net-Webser
link: Please use code here... tags when posting code. How do you see that it is empty? Note that the content itself will be exactly the same as the string.
link: Sorry guys and thanks for all your help. The problem was caused - as almost always - from the subject in front of the screeen :confused: The GetInputS

Hey DonManfred, thanks for your reply :) File.Copy2(job.GetInputStream,OutStream) is giving me exactly the same error, probably the GetInputstream method.
link: put the filename in Job.tag before calling download then in Jobdone Log("DownloadReady: "&job.Tag) OutStream = File.OpenOutput(File.DirRoo
link: I tried it really hard for days, with no success. Please tell me how to download images from web using HttpJob ( HttpUtils2 ) The final result that i

Dim job As HttpJob job.Initialize("", Me) job.Download("http://uplink.duplexfx.com:8800/") Wait For (job) JobDone (job As HttpJob) Dim in As InputStream = job.GetInputStream job.Release

Powered by ColBERT