Question

我是vb.net的新手，我正在开发一个web服务。我想在json对象中发送响应。我只有一个字符串作为回应。

public string GetUser(String IMEI)
{
    string msg = "";
    string SQL1 = "Select Email from [Customer] where [Vehicle]='" + IMEI + "'";
    DataTable dt = dbcom.GetDataTable(SQL1);
    if (dt.Rows.Count > 0)
    {
        msg = dt.Rows[0]["Email"].ToString();
        //CV(username, IMEI);
        //vehiclechk(IMEI);
    }
    return msg;
}

这发送xml字符串。我们如何将msg字符串转换为json。

Answer 1

我想有两种方法可以做到。由于这是一个简单的字符串，你可以强制它：

 Dim jsonMsg = "{""msg"":""" & msg & """}"

将更复杂的方法放入类中并将其序列化。

Public Class MyMessage
  Public Property Msg As String
  Public Sub New(myMsg as String)
    Msg = myMsg
  End Sub
End Class

Dim myMsg As New MyMessage(msg)
Dim serializer as new JavaScriptSerializer
Dim jsonMsg = serializer.Serialize(myMsg)

您需要对System.Runtime.CompilerServices的引用。

将vb.net字符串转换为Json对象？

1 个答案: