Codificar Archivo Base-64 en Asp.NET

Algunos hemos tenido el problema de mandar un Archivo a un Servicio Web, y a veces ciertas cosas no nos resultan.
Bueno aquí les dejó el Código para poder enviar un String al servicio y luego poder trabajarlo

Public Function CodificaArchivoBase64(ByVal FileName As String) As String
Dim inFile As System.IO.FileStream
Dim binaryData() As Byte

Try
inFile = New System.IO.FileStream(FileName, _
System.IO.FileMode.Open, _
System.IO.FileAccess.Read)
ReDim binaryData(inFile.Length)

Dim bytesRead As Long = inFile.Read(binaryData, _
0, _
inFile.Length)
inFile.Close()
inFile.Dispose()
inFile = Nothing
GC.Collect()
Catch exp As System.Exception
Return ""
End Try

Try
Return System.Convert.ToBase64String(binaryData, 0, binaryData.Length)
Catch exp As System.ArgumentNullException
Return ""
End Try
End Function

Así que con esto se nos solucionan un poco más los problemas.
Espero les sirva.

Regards.