Bonjour à tous,

Lorsque j'encode en base 64 un fichier texte avec uniquement la lettre B, la string de sortie comporte une erreur.

Résultat="QgA="
Au lieu de "Qg=="

Je ne comprends pas pour la commande rajoute un A.
Le A est rajouté pour n'importe quel fichier d'entrée (autre fichier texte, jpg, pdf)
Y'a t il un paramètrage à réaliser dans la commande ToBase64String


Merci pour votre aide.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Dim srcFile as string ="C:/Donnees/test.txt"
Dim inFile As System.IO.FileStream
Dim binaryData() As Byte
inFile = New System.IO.FileStream(srcFile, System.IO.FileMode.Open, System.IO.FileAccess.Read)
ReDim binaryData(inFile.Length)
Dim bytesRead As Long = inFile.Read(binaryData, 0, inFile.Length)
inFile.Close()
Dim base64String As String
base64String = System.Convert.ToBase64String(binaryData, 0, binaryData.Length)