richard terry schrieb:
> On Mon, 1 Dec 2008 06:50:06 am Robert Moss wrote:
>
> Robert this may not be much help to you and I'm not sure how related to your 
> problem it is,  but just on the off chance. I struggled with saving a picture 
> and retrieving from a postgres field. 
>
> The code I included worked really well for a long time, but in the last 
> couple 
> of upgrades though it saves the file ok, it retreives a corrupt image. and I 
> get a libpng error (sob sob) and I havn't had time or inclination to re-look 
> at it.
>
> Please if/when you figure it out can I have a few pointers.
>
> Regards
>
> Richard
>
>
>
>   
>> The ImgData stops writing when it comes to a byte with value &H00 (I
>> believe) although I'm pretty sure it doesn't matter how I write the stream,
>> once it's read as a String, it becomes terminated by any NULL char. So my
>> question is this: How do I read the data from the Socket in binary, write
>> it to a stream file in binary, but STILL I MUST be able to split the data
>> based on the 2 CRLF's
>>
>> On Sun, Nov 30, 2008 at 11:48 AM, Robert Moss 
>>     
> <[EMAIL PROTECTED]>wrote:
>   
>>> Sorry that's not it, I mis-copied the line, in the actual code it does
>>> Mid(sData, p1 + 4)
>>>
>>> On Sun, Nov 30, 2008 at 2:39 AM, Doriano Blengino <
>>>
>>> [EMAIL PROTECTED]> wrote:
>>>       
>>>> Robert Moss ha scritto:
>>>>         
>>>>> I am trying to get an image (or any binary data) downloaded from a
>>>>>           
>>>> website
>>>>
>>>>         
>>>>> and into a jpg file. I expect I will need to use the Byte[] datatype,
>>>>>           
>>>> but I
>>>>
>>>>         
>>>>> absolutely can NOT use Callbacks when the data comes in this time.
>>>>>
>>>>> ...
>>>>>
>>>>> DO UNTIL(EOF(#Sock))
>>>>>     READ #Sock, sBuf, Lof(Sock)
>>>>>     sTotal &= sBuf
>>>>> LOOP
>>>>>
>>>>> CLOSE #Sock
>>>>>
>>>>>
>>>>> p1 = InStr(sTotal, "\r\n\r\n")
>>>>>
>>>>> ImgData = Mid(sTotal, p1)
>>>>>
>>>>> OPEN "localimg.jpg" FOR OUTPUT CREATE AS #myFile
>>>>> WRITE #myFile, ImgData, Len(ImgData)
>>>>> CLOSE #myFile
>>>>>           
>>>> I think there is a problem with InStr(...,"\r\n\r\n").
>>>> By taking mid$(...,p1), you retain the two CRLFs, which are not good at
>>>> the beginning of a jpeg file.
>>>> You should get rid of the first 4 characters. May be there are still
>>>> other problems, but this is one for sure.
>>>>
>>>> Regards,
>>>>
>>>> --
>>>> Doriano Blengino
>>>>
>>>> "Listen twice before you speak.
>>>> This is why we have two ears, but only one mouth."
>>>>
>>>>
>>>> ------------------------------------------------------------------------
>>>> - This SF.Net email is sponsored by the Moblin Your Move Developer's
>>>> challenge
>>>> Build the coolest Linux based applications with Moblin SDK & win great
>>>> prizes
>>>> Grand prize is a trip for two to an Open Source event anywhere in the
>>>> world
>>>> http://moblin-contest.org/redirect.php?banner_id=100&url=/
>>>> _______________________________________________
>>>> Gambas-user mailing list
>>>> Gambas-user@lists.sourceforge.net
>>>> https://lists.sourceforge.net/lists/listinfo/gambas-user
>>>>         
>> -------------------------------------------------------------------------
>> This SF.Net email is sponsored by the Moblin Your Move Developer's
>> challenge Build the coolest Linux based applications with Moblin SDK & win
>> great prizes Grand prize is a trip for two to an Open Source event anywhere
>> in the world http://moblin-contest.org/redirect.php?banner_id=100&url=/
>> _______________________________________________
>> Gambas-user mailing list
>> Gambas-user@lists.sourceforge.net
>> https://lists.sourceforge.net/lists/listinfo/gambas-user
>>     
>
>
>   
> ------------------------------------------------------------------------
>
> -------------------------------------------------------------------------
> This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
> Build the coolest Linux based applications with Moblin SDK & win great prizes
> Grand prize is a trip for two to an Open Source event anywhere in the world
> http://moblin-contest.org/redirect.php?banner_id=100&url=/
> ------------------------------------------------------------------------
>
> _______________________________________________
> Gambas-user mailing list
> Gambas-user@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
Hi Richard,

could you comment on your code? I understand the section "ifbuffer ..." 
not.

Thank you very much

Lars

------------------------------------------------------------------------------
SF.Net email is Sponsored by MIX09, March 18-20, 2009 in Las Vegas, Nevada.
The future of the web can't happen without you.  Join us at MIX09 to help
pave the way to the Next Web now. Learn more and register at
http://ad.doubleclick.net/clk;208669438;13503038;i?http://2009.visitmix.com/
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to