Admin: 1 revision

2013-02-15T19:12:50Z

1 revision

Admin: Created page with "= Action = Converts a string into the Base-64 representation.
2013-02-07T10:39:59Z

Created page with "= Action = Converts a string into the Base-64 representation. Action =

Converts a string into the Base-64 representation.

 

 

= Syntax =

Result = BASE64ENC( source)

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="609" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 75px; border: 1px solid rgb(0, 0, 0);" |
Result

| valign="top" width="100%" style="width: 525px; border: 1px solid rgb(0, 0, 0);" |
A string variable that is assigned with the coded string.

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 75px; border: 1px solid rgb(0, 0, 0);" |
Source

| valign="top" width="100%" style="width: 525px; border: 1px solid rgb(0, 0, 0);" |
The source string that must be code with base-64.

|}
</div>
 

Base-64 is not an encryption protocol. It sends data in 7-bit ASCII data format. MIME, web servers, and other Internet servers and clients use Base-64 coding.

 

The provided Base64Enc() function is an encoding function. You need it when you want to send attachments with POP3 for example.

The target string will use 1 additional byte for every 3 bytes.

So make sure the target string is dimensioned longer then the original string.

 

 

= See also =

[[CONFIG_TCPIP|CONFIG TCPIP]] , [[GETSOCKET]] , [[SOCKETCONNECT]] , [[SOCKETSTAT]] , [[TCPWRITE]] , [[TCPWRITESTR]] , [[CLOSESOCKET]] , [[SOCKETLISTEN]] , [[BASE64DEC]]

 

 

= Example =

 <source lang="bascomavr">
$regfile = "m48def.dat" ' specify the used micro
$crystal = 8000000 ' used crystal frequency
$baud = 19200 ' use baud rate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
$lib "tcpip.lbx"
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0

Dim S As String * 15 , Z As String * 15

S = "bWFyazptYXJr"
Z = Base64dec(s)
Print Z 'mark:mark
s = Base64Enc(z)
Print s
End
</source> {{Languages}}

[[Category:BASCOM_Language_Reference/de]]