Question

我承认我是使用 HTTP POST 的新手……但我认为我已经正确发送了 HTTP POST 请求，在我的远程 Web 端函数中处理了它并返回了响应。

我的 Webside 函数生成如下响应：

 DataTable _table = new DataTable("responseValues");
        DataColumn ColumnToken = new DataColumn("token", typeof(string));_table.Columns.Add(ColumnToken);
        DataColumn ColumnMessage = new DataColumn("message", typeof(string));  _table.Columns.Add(ColumnMessage);
        DataRow newRow = _table.NewRow();
        newRow["token"] = _token;
        newRow["message"] = responseMessage.ToString();
        _table.Rows.Add(newRow);

        //Create a new response object to return to the HTTPPost request
        HttpResponseMessage response = new System.Net.Http.HttpResponseMessage(System.Net.HttpStatusCode.OK);

        //Populate .Content with json formatted data
        // use system.net.http.Json
        JsonSerializerOptions _JsonSerializerOptions = new JsonSerializerOptions();
        _JsonSerializerOptions.PropertyNameCaseInsensitive = true;
        _JsonSerializerOptions.PropertyNamingPolicy = JsonNamingPolicy.CamelCase;
        response.Content = JsonContent.Create(inputValue: _table, 
                                                options: _JsonSerializerOptions, 
                                                mediaType: new MediaTypeHeaderValue("application/json"));

响应内容如下所示。我已经爆炸了，所以我可以理解它：

    {
"version":"1.1",
"content":
    {
    "objectType":"System.Data.DataTable, 
    System.Data.Common, 
    Version=4.2.2.0, 
    Culture=neutral, 
    PublicKeyToken=b03f5f7f11d50a3a",
    "value":
        [
        {
        "token":"3669a2a1d397e83bcda5",
        "message":"CONNECTION STATE = OpenSUCCESS. Token Created."
        }
        ],
    "headers":
        [
        {
        "key":"Content-Type",
        value":
            [
            "application/json"
            ]
        }
        ]
    },
    "statusCode":200,
    "reasonPhrase":"OK",
    "headers":[],
    "trailingHeaders":[],
    "requestMessage":null,
    "isSuccessStatusCode":true
}

我的问题是我无法提取（反序列化）已序列化到其中的数据表。根据我的尝试，我得到了 2 个不同的结果：如果我试试这个：

        _JsonSerializerOptions.PropertyNameCaseInsensitive = True
        _JsonSerializerOptions.PropertyNamingPolicy = JsonNamingPolicy.CamelCase
        
        Dim Rslt As DataTable = Await _Login_postResponse.Content.ReadFromJsonAsync(type:=GetType(System.Data.DataTable), options:=_JsonSerializerOptions)

Rslt 成为一个没有错误的空数据表。

但是如果我试试这个

    Dim strRslt = Await _Login_postResponse.Content.ReadAsStringAsync
Dim Rslt As DataTable = Newtonsoft.Json.JsonConvert.DeserializeObject(Of DataTable)(strRslt)

我收到此错误：

<块引用>

读取数据表时出现意外的 JSON 标记。预期的 StartArray，得到起始对象。路径 ''，第 1 行，位置 1。

我已查看此帖子：StackOverflow 并尝试在响应中发回数据集：

结果是这个 response.content:

        DataSet _dset = new DataSet();
        DataTable _table = new DataTable("responseValues");
        DataColumn ColumnToken = new DataColumn("token", typeof(string));_table.Columns.Add(ColumnToken);
        DataColumn ColumnMessage = new DataColumn("message", typeof(string));  _table.Columns.Add(ColumnMessage);
        DataRow newRow = _table.NewRow();
        newRow["token"] = _token;
        newRow["message"] = responseMessage.ToString();
        _table.Rows.Add(newRow);
        _dset.Tables.Add(_table);
        //Create a new response object to return to the HTTPPost request
        HttpResponseMessage response = new System.Net.Http.HttpResponseMessage(System.Net.HttpStatusCode.OK);

        //Populate .Content with json formatted data
        // use system.net.http.Json
        JsonSerializerOptions _JsonSerializerOptions = new JsonSerializerOptions();
        _JsonSerializerOptions.PropertyNameCaseInsensitive = true;
        _JsonSerializerOptions.PropertyNamingPolicy = JsonNamingPolicy.CamelCase;
        response.Content = JsonContent.Create(inputValue: _dset, 
                                                options: _JsonSerializerOptions, 
                                                mediaType: new MediaTypeHeaderValue("application/json"));


{
"version":"1.1",
"content":
    {
    "objectType":"System.Data.DataSet, 
    System.Data.Common, 
    Version=4.2.2.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a",
    "value":
        {
        "responseValues":
            [
            {
            "token":"64b2818c1b2d9d09eb42",
            "message":"CONNECTION STATE = OpenSUCCESS. Token Created."
            }
            ]
        },
        "headers":
            [
            {
            "key":"Content-Type",
            "value":
                [
                "application/json"
                ]
            }
            ]
    },
"statusCode":200,
"reasonPhrase":"OK",
"headers":[],
"trailingHeaders":[],
"requestMessage":null,
"isSuccessStatusCode":true
}

如果我使用这种方法反序列化：

        Dim strRslt = Await _Login_postResponse.Content.ReadAsStringAsync
Dim Rslt As DataTable = Newtonsoft.Json.JsonConvert.DeserializeObject(Of DataTable)(strRslt)

我收到此错误：

<块引用>

读取数据表时出现意外的 JSON 标记。预期的 StartArray，得到 String。路径“版本”，第 1 行，位置 16。

这个方法返回一个空数据集

Dim Rslt As DataSet = Await _Login_postResponse.Content.ReadFromJsonAsync(type:=GetType(System.Data.DataSet), options:=_JsonSerializerOptions)

我做错了什么？

如何从此 HTTP POST Respose

0 个答案: