XmlWriter.WriteBase64 encodes specified binary bytes as Base64

 
Option Explicit
Option Strict

Imports System
Imports System.IO
Imports System.Xml

Public Class Sample

  Public Shared Sub Main()
        Dim bufferSize As Integer = 1000
        Dim buffer(bufferSize) As Byte
        Dim readBytes As Integer = 0
    
        Using writer As XmlWriter = XmlWriter.Create("output.xml")
                Dim inputFile As New FileStream("C:\a.jpg", FileMode.OpenOrCreate, FileAccess.Read, FileShare.Read)
                writer.WriteStartDocument()
                writer.WriteStartElement("image")
                Dim br As New BinaryReader(inputFile)
                Do
                    readBytes = br.Read(buffer, 0, bufferSize)
                    writer.WriteBase64(buffer, 0, readBytes)
                Loop While bufferSize <= readBytes
                br.Close()
    
            writer.WriteEndElement()
            writer.WriteEndDocument()
    
        End Using
    End Sub 'Main
End Class 'Sample

Related examples in the same category

1.	Append new child to the XmlWriter
2.	Create XmlWriter using XmlWriter.Create method.
3.	Saves the XML document to the specified XmlWriter.
4.	Saves all the children of the node to the specified XmlWriter.
5.	Saves the current node to the specified XmlWriter.
6.	XmlWriter.Close closes this stream and the underlying stream.
7.	Creates XmlWriter using the specified stream.
8.	XmlWriter.Create creates a new XmlWriter instance using the stream and XmlWriterSettings object.
9.	Creates a new XmlWriter instance using the specified filename.
10.	Creates XmlWriter instance using the TextWriter and XmlWriterSettings objects.
11.	XmlWriter.WriteBinHex encodes specified binary bytes as BinHex
12.	XmlWriter.WriteEndElement closes one element and pops the corresponding namespace scope.
13.	XmlWriter.WriteNode copies data from the reader to the writer
14.	XmlWriter.WriteNode (XPathNavigator, Boolean)
15.	XmlWriter.WriteProcessingInstruction writes out a processing instruction
16.	XmlWriter.WriteString writes the given text content.
17.	XmlWriter.WriteValue
18.	XPathNavigator.InsertBefore returns an XmlWriter
19.	XPathNavigator.PrependChild returns XmlWriter to create a new child node
20.	XDocument.Save Method (XmlWriter) serializes this XDocument to an XmlWriter.
21.	XDocument.WriteTo writes this document to an XmlWriter.
22.	XElement.Save (XmlWriter) serializes this element to an XmlWriter.
23.	XElement.WriteTo writes this element to an XmlWriter.
24.	XNode.WriteTo writes this node to an XmlWriter.

XmlWriter.WriteBase64 encodes specified binary bytes as Base64 : XmlWriter « XML « VB.Net

Related examples in the same category