Convertir documento a Byte base64

Convertir Doc a Byte()

Public Shared Function convertirDoc_Byte(rutaArchivo As String) As Byte()
        Dim fileBytes = File.ReadAllBytes(rutaArchivo)
        Dim encodedFile = Convert.ToBase64String(fileBytes)

        Dim aa = System.Text.Encoding.Default.GetBytes(encodedFile)
        Return aa
    End Function

Convertir Byte() a Doc
Public Shared Sub convertirByte_doc(archBytes As Byte(),rutaArchivo As String)
        Dim base64String = System.Text.Encoding.Default.GetString(archBytes)
        Dim imageBytes As Byte() = Convert.FromBase64String(base64String)

        File.WriteAllBytes(rutaArchivo, imageBytes)

    End Sub

Saludos

Mostrar una Imagen desde una ruta compartida

A veces se desea mostrar una imagen desde una ruta externa a la aplicación. Una de las soluciones seria la siguiente:

aspx:

<asp:Image ID="ss" runat="server" />

VB:

Dim reader = File.ReadAllBytes("\\XXXX\YYYY\icon.png")

Dim image1 = New MemoryStream(reader)

ss.ImageUrl = "data:image/png;base64," + Convert.ToBase64String(image1.ToArray(), 0, image1.ToArray().Length)

Saludos