23 lines
534 B
VB.net
23 lines
534 B
VB.net
Imports System.Runtime.Serialization
|
|
|
|
Namespace FileStorage.NewFile
|
|
<Serializable>
|
|
<DataContract>
|
|
Public Class NewFileResponse
|
|
Inherits Messages.BaseResponse
|
|
|
|
<DataMember>
|
|
Public Property ObjectId As Long
|
|
|
|
Public Sub New(pObjectId As Long)
|
|
MyBase.New()
|
|
ObjectId = pObjectId
|
|
End Sub
|
|
|
|
Public Sub New(pException As Exception, Optional pDetails As String = "")
|
|
MyBase.New(pException, pDetails)
|
|
End Sub
|
|
End Class
|
|
|
|
End Namespace
|