rename service directories

This commit is contained in:
Jonathan Jenne
2020-04-06 15:16:36 +02:00
parent 9a0235e941
commit 7de03b4889
93 changed files with 47 additions and 202 deletions

View File

@@ -0,0 +1,28 @@
<Serializable>
Public Class DocumentResult2
Inherits BaseResult
Public Document As DocumentObject
Public HasContents As Boolean = False
Public Contents As Byte()
Public Sub New(Document As DocumentObject)
MyBase.New()
Me.Document = Document
End Sub
Public Sub New(Document As DocumentObject, Contents As Byte())
MyBase.New()
Me.Document = Document
Me.Contents = Contents
Me.HasContents = True
End Sub
Public Sub New(ErrorMessage As String)
MyBase.New(ErrorMessage)
End Sub
Public Class DocumentObject
Public FileName As String
End Class
End Class