EDMI: Fix byte array creation

Modules.EDMIAPI/Client.vb

@@ -81,7 +81,7 @@ Public Class Client
             End If
 
             Using oStream As New FileStream(FilePath, FileMode.Open)
-                Dim oContents As Byte() = {}
+                Dim oContents(oStream.Length) As Byte
                 Dim oBytesRead = Await oStream.ReadAsync(oContents, 0, oStream.Length)
                 Dim oData As New DocumentImportRequest() With {
                     .FileName = oFileInfo.Name,