Exemplo codificação em Base64

Vamos exemplificar em VB.NET a geração da string em base64 do conteúdo de um arquivo.

Dim fs As New System.IO.FileStream(“c:\teste.pdf”, IO.FileMode.Open, IO.FileAccess.Read)
Dim buffer() As Byte = Nothing
buffer = New Byte(fs.Length) {}
fs.Read(buffer, 0, fs.Length)
Dim conteudoArquivo As String = Nothing
conteudoArquivo = Convert.ToBase64String(buffer, 0, fs.Length)
fs.Close()

A string conteudoArquivo conterá o conteúdo do arquivo especificado em formato base64. Desta forma poderá ser colocado em um XML para auto cadastrar no Portal QualiSign.