如何在vb.net可执行文件中创建和存储JSON对象

Question

我在vb.net控制台应用程序中找不到将Dictionary(Of String, Object)转换为JSON对象字符串的方法。

当它在ASP中时，我使用JavaScriptSerializer.Serialize（）方法来序列化字典，但现在我在vb.net控制台中，无法访问System.Web类

它必须在一个可执行文件中完成，该可执行文件可以每天自动运行一次（从windows计划的任务中），以将数据存储在文本文件中（稍后我们将转移到一个单独的临时数据库），这样数据库上的负载就更少了。

以前这是在asmx脚本中完成的，但这只在测试中起作用，让一个人每天从网络浏览器上运行它是不切实际的，因为它为人为错误留下了空间。我们试图从批脚本中打开IExplorer中的页面，但浏览器会给出关于页面安全证书的安全错误，这需要人工交互，这需要尽快自动化。

我不介意你们中的一个人有自己的函数，可以将至少一个数组转换为JSON对象String，这样我就可以将其存储为

Answer 1

当它在ASP中时，我使用JavaScriptSerializer.Serialize（）方法来序列化字典，但现在我在vb.net控制台中，无法访问System.Web类

即使在控制台应用程序中，您也可以使用JavaScriptSerializer。只需添加对System.Web.Extensions.

Answer 2

您可以使用JSON.NET将vb数组序列化为JSON。不要认为有一个库可以序列化Dictionary。

顺便说一句，我用下面的.vbs脚本调用aspx页面，它运行良好，没有任何安全问题：

Dim o
Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET", "http://myserver/myjob.aspx", False
o.setRequestHeader "timeout", "1800000"
o.send
WScript.Quit(0)

和一批：

wscript c:myscript.vbs