62 lines
1.0 KiB
VB.net
62 lines
1.0 KiB
VB.net
Imports System.Net
|
|
Imports System.Web.Http
|
|
Imports Microsoft.Web.Http
|
|
Imports Newtonsoft.Json
|
|
|
|
|
|
Namespace TESTController.Controllers.V1
|
|
|
|
|
|
|
|
<ApiVersion("1")>
|
|
<RoutePrefix("api/{apiVersion:apiVersionConstraint(v1)}/TEST")>
|
|
Public Class TESTController
|
|
Inherits System.Web.Http.ApiController
|
|
|
|
Public Function GetValues() As String
|
|
Return "TEST 1"
|
|
End Function
|
|
|
|
End Class
|
|
|
|
|
|
End Namespace
|
|
|
|
|
|
|
|
'Namespace TESTController.Controllers.V2
|
|
|
|
|
|
|
|
' <ApiVersion("2")>
|
|
' <RoutePrefix("api/v2/TEST")>
|
|
' Public Class TESTController
|
|
' Inherits System.Web.Http.ApiController
|
|
|
|
' Public Function GetValues() As String
|
|
' Return "TEST 2"
|
|
' End Function
|
|
|
|
' End Class
|
|
|
|
'End Namespace
|
|
|
|
|
|
|
|
'Namespace TESTController.Controllers.V3
|
|
|
|
' <ApiVersion("3")>
|
|
' <RoutePrefix("api/v3/TEST")>
|
|
' Public Class TESTController
|
|
' Inherits System.Web.Http.ApiController
|
|
|
|
|
|
' Public Function GetValues() As String
|
|
' Return "TEST 3"
|
|
' End Function
|
|
|
|
' End Class
|
|
|
|
|
|
'End Namespace
|