Base64 encode data: Difference between revisions

(Add code for PureBasic)
Line 1,013:
=={{header|PureBasic}}==
<lang purebasic>InitNetwork()
 
*BufferRaw = ReceiveHTTPMemory("http://rosettacode.org/favicon.ico")
If *BufferRaw
RawSizeDebug =Base64Encoder(*BufferRaw, MemorySize(*BufferRaw))
Base64Size = RawSize * 1.35
*Buffer64 = AllocateMemory(RawSize * 1.35)
Base64Size = Base64EncoderBuffer(*BufferRaw, RawSize, *Buffer64, Base64Size)
Debug PeekS(*Buffer64, Base64Size, #PB_Ascii)
FreeMemory(*BufferRaw)
FreeMemory(*Buffer64)
Else
Debug "Download failfailed"
EndIf</lang>
 
Anonymous user