Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

Pagetitle
Encode64
Encode64

Função: Encode64

Converte uma string texto ou binária (Contendo caracteres da tabela ASCII) para uma nova string codificada segundo o padrão BASE64

Sintaxe

Bloco de código
collapsefalse
Encode64( <
cToConvert> ) --> cRet 
 cToConvert > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cToConvert

...

caractere

Indica a string ASCII que será convertida para BASE64

X

 

Retorno

Nome

...

Tipo

...

Descrição

cRet

...

caractere

Retorna a string codificada em BASE64.

Observações

Essa

...

função formata o texto codificado, conforme as especificações RFC para base 64, para que cada linha da mensagem passada por parâmetro não ultrapasse 76 caracteres. Sendo assim, após os 76 caracteres, a mensagem terá uma quebra de linha inserida.
Para mais informações, acesse o endereço: http://www.faqs.org/rfcs/rfc1522.html.

Informações adicionais

Exemplos

Bloco de código
themeEclipse
languagecpp
titleExemplo 1
linenumberstrue
collapsefalse
#define CRLF Chr(13) + Chr(10)


//+----------------------------------------------------------------------------+


//|Exemplo de uso da função Encode64 e Decode64                                |


//+----------------------------------------------------------------------------+


User Function Exemplo()


Local cTexto := ""


Local cEncode64 := ""


Local cDecode64 := ""


Local cMensagem := ""

 
cTexto := "à noite, vovô kowalsky vê o ímã cair no pé do pingüim "

  
cTexto += "queixoso e vovó põe açúcar no chá de tâmaras do jabuti feliz."

 
cEncode64 := Encode64(cTexto)

 
cDecode64 := Decode64(cEncode64)

  
cMensagem := "Pangrama origem: [" + cTexto + "]"

  
cMensagem += CRLF + "Texto -> Texto64: [" + cEncode64 + "]"

 
cMensagem += CRLF + "Texto64 -> Texto: [" + cDecode64 + "]"


Return MsgInfo(cMensagem, "Exemplo")

Abrangência

Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10

Veja

...

Informações adicionais

...

também