set logEntireMessage to false to prevent outofmemory exception when importing multiple large files

This commit is contained in:
Jonathan Jenne
2020-04-08 13:42:17 +02:00
parent b78949ae46
commit 86c99f0fc6
7 changed files with 124 additions and 81 deletions

View File

@@ -42,7 +42,7 @@ Public Class Form1
Dim oFileName As String = oItem
Dim oFileInfo As New FileInfo(oFileName)
listboxLog.Items.Add($"Importing {oFileInfo.Name}...")
listboxLog.Items.Add($"Importing {oFileInfo.Name}... ({FormatBytes(oFileInfo.Length)})")
Dim oContents As Byte() = New Byte(oFileInfo.Length) {}
@@ -58,7 +58,6 @@ Public Class Form1
End If
oSW.Stop()
listboxLog.Items.Add($"Import Time: {FormatTime(oSW.ElapsedMilliseconds)}")
listboxLog.Items.Add($"File Size: {FormatBytes(oFileInfo.Length)}")
listboxLog.Items.Add("")
Next