Imports System
Imports System.IO
Imports System.Collections
Imports System.Collections.Generic
Imports System.Runtime.Serialization
Imports ServiceStack
Imports ServiceStack.DataAnnotations
Imports MyApp.ServiceModel
Namespace Global
Namespace MyApp.ServiceModel
Public Partial Class FileSystemFile
Implements IFile
Public Overridable Property Id As Integer Implements IFile.Id
Public Overridable Property FileName As String Implements IFile.FileName
Public Overridable Property FilePath As String Implements IFile.FilePath
Public Overridable Property ContentType As String Implements IFile.ContentType
Public Overridable Property ContentLength As Long Implements IFile.ContentLength
<References(GetType(FileSystemItem))>
Public Overridable Property FileSystemItemId As Integer
End Class
Public Partial Class QueryFileSystemFiles
Inherits QueryDb(Of FileSystemFile)
End Class
Public Partial Class Todo
Public Overridable Property Id As Long
Public Overridable Property Text As String
Public Overridable Property IsFinished As Boolean
End Class
End Namespace
Namespace ServiceStack
<DataContract>
Public Partial Class QueryBase
<DataMember(Order:=1)>
Public Overridable Property Skip As Integer?
<DataMember(Order:=2)>
Public Overridable Property Take As Integer?
<DataMember(Order:=3)>
Public Overridable Property OrderBy As String
<DataMember(Order:=4)>
Public Overridable Property OrderByDesc As String
<DataMember(Order:=5)>
Public Overridable Property Include As String
<DataMember(Order:=6)>
Public Overridable Property Fields As String
<DataMember(Order:=7)>
Public Overridable Property Meta As Dictionary(Of String, String)
End Class
Public Partial Class QueryDb(Of T)
Inherits QueryBase
End Class
<DataContract>
Public Partial Class QueryResponse(Of T)
<DataMember(Order:=1)>
Public Overridable Property Offset As Integer
<DataMember(Order:=2)>
Public Overridable Property Total As Integer
<DataMember(Order:=3)>
Public Overridable Property Results As List(Of Todo)
<DataMember(Order:=4)>
Public Overridable Property Meta As Dictionary(Of String, String)
<DataMember(Order:=5)>
Public Overridable Property ResponseStatus As ResponseStatus
End Class
End Namespace
End Namespace
VB.NET QueryFileSystemFiles DTOs
To override the Content-type in your clients, use the HTTP Accept Header, append the .json suffix or ?format=json
To embed the response in a jsonp callback, append ?callback=myCallback
The following are sample HTTP requests and responses. The placeholders shown need to be replaced with actual values.
POST /json/reply/QueryFileSystemFiles HTTP/1.1
Host: blazor-gallery.servicestack.net
Accept: application/json
Content-Type: application/json
Content-Length: length
{"skip":0,"take":0,"orderBy":"String","orderByDesc":"String","include":"String","fields":"String","meta":{"String":"String"}}
HTTP/1.1 200 OK Content-Type: application/json Content-Length: length {"offset":0,"total":0,"results":[{"id":0,"fileName":"String","filePath":"String","contentType":"String","contentLength":0,"fileSystemItemId":0}],"meta":{"String":"String"},"responseStatus":{"errorCode":"String","message":"String","stackTrace":"String","errors":[{"errorCode":"String","fieldName":"String","message":"String","meta":{"String":"String"}}],"meta":{"String":"String"}}}