EDMIBenchmark: Update to latest service version

This commit is contained in:
Jonathan Jenne
2020-12-23 14:44:11 +01:00
parent 27cac7dbf0
commit dd09a6ce4d
3 changed files with 9 additions and 6 deletions

View File

@@ -130,12 +130,12 @@ Public Class Form1
End If
Dim oObjectId As Integer = TextboxObjectId.EditValue
Dim oResponse As Client.StreamedFile = Await _Client.GetFileByObjectIdAsync(oObjectId)
Dim oResponse As Client.DocumentInfo = Await _Client.GetDocumentInfo(2, oObjectId)
DocumentViewer1.LoadFile(oResponse.FileName, oResponse.Stream)
DocumentViewer1.LoadFile(oResponse.FullPath)
oSWTotal.Stop()
AddLogMessage($"File [{oResponse.FileName}] loaded: [{FormatTime(oSWTotal.ElapsedMilliseconds)}]")
AddLogMessage($"File [{oResponse.FullPath}] loaded: [{FormatTime(oSWTotal.ElapsedMilliseconds)}]")
Catch ex As FaultException
MsgBox(ex.Reason.ToString, MsgBoxStyle.Critical, "Error from Service")
Catch ex As Exception