Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Json 在HTTP请求中使用RESTful WCF服务_Json_Vb.net_Wcf_Rest - Fatal编程技术网

Json 在HTTP请求中使用RESTful WCF服务

Json 在HTTP请求中使用RESTful WCF服务,json,vb.net,wcf,rest,Json,Vb.net,Wcf,Rest,我试图通过使用发出POST请求来使用。不幸的是,我不知道JSON请求应该是什么样子 VB.NET项目的相关部分 IUserService.vb <OperationContract(), WebInvoke(Method:="POST", UriTemplate:="/User/Create", RequestFormat:=WebMessageFormat.Json, ResponseFormat

我试图通过使用发出POST请求来使用。不幸的是,我不知道JSON请求应该是什么样子

VB.NET项目的相关部分

IUserService.vb

<OperationContract(),
    WebInvoke(Method:="POST",
              UriTemplate:="/User/Create",
              RequestFormat:=WebMessageFormat.Json,
              ResponseFormat:=WebMessageFormat.Json,
              BodyStyle:=WebMessageBodyStyle.Bare)>
    Sub CreateUser(ByVal user As User)
Public Sub CreateUser(ByVal user As User) Implements IUserService.CreateUser
    user.UserObject.CreateUser(user)
End Sub
Private m_Id As Integer
Private m_Name As String
Private m_Age As Integer
Private m_Sex As Sex
Private m_Comments As String
Private Shared m_UserObj As User
Private m_LUser As List(Of User)

Public Shared ReadOnly Property UserObject() As User
    Get
        If m_UserObj Is Nothing Then
            m_UserObj = New User()
        End If

        Return m_UserObj
    End Get
End Property

Friend Sub CreateUser(ByVal user As User)
    LUser.Add(user)
End Sub

Public Enum Sex
    Male = 0
    Female = 1
End Enum
User.vb

<OperationContract(),
    WebInvoke(Method:="POST",
              UriTemplate:="/User/Create",
              RequestFormat:=WebMessageFormat.Json,
              ResponseFormat:=WebMessageFormat.Json,
              BodyStyle:=WebMessageBodyStyle.Bare)>
    Sub CreateUser(ByVal user As User)
Public Sub CreateUser(ByVal user As User) Implements IUserService.CreateUser
    user.UserObject.CreateUser(user)
End Sub
Private m_Id As Integer
Private m_Name As String
Private m_Age As Integer
Private m_Sex As Sex
Private m_Comments As String
Private Shared m_UserObj As User
Private m_LUser As List(Of User)

Public Shared ReadOnly Property UserObject() As User
    Get
        If m_UserObj Is Nothing Then
            m_UserObj = New User()
        End If

        Return m_UserObj
    End Get
End Property

Friend Sub CreateUser(ByVal user As User)
    LUser.Add(user)
End Sub

Public Enum Sex
    Male = 0
    Female = 1
End Enum
我尝试过类似的方法但没有成功(响应:400个错误请求):


POST请求应该是什么样子?

我刚刚添加了以下标题:

  • 内容类型:application/json
  • 接受:application/json
  • 它就像一个符咒