json 和 vb.net 10

Question

我正在制作一个程序，应该从不同的 json 收集相同的信息。

例如来自：

http://steamcommunity.com/market/priceoverview/?appid=730&currency=3&market_hash_name=AK-47%20%7C%20Black%20Laminate%20%28Factory%20New%29

我得到以下的 JSON：

{"success":true,"lowest_price":"84,66\u20ac"}

我要最低价！ 到目前为止，我已经设法将这些信息放到我想要的地方！一到两个就可以了，但我尝试从不同的网址获得 1000 个不同的“最低价格”，这有问题！你能帮我找到一个更好的方法来收集所有这些价格吗？ 我想把号码放在不同的标签上。

例如

Try
    Dim request As Net.HttpWebRequest
    Dim response As Net.HttpWebResponse = Nothing
    Dim reader As StreamReader
    request = DirectCast(WebRequest.Create("http://steamcommunity.com/market/priceoverview/?appid=730&currency=3&market_hash_name=AK-47%20%7C%20Black%20Laminate%20%28Factory%20New%29"), HttpWebRequest)
    response = DirectCast(request.GetResponse(), HttpWebResponse)
    reader = New StreamReader(response.GetResponseStream())
    Dim FN1 As String
    FN1 = reader.ReadToEnd()
    Dim jResults As JObject = JObject.Parse(FN1)
    Dim results As List(Of JToken) = jResults.Children().ToList()


    Dim json As JObject = JObject.Parse(FN1)
    Dim fn1ts As String = (json.Item("lowest_price"))
    label1.text = fn1ts
Catch ex As Exception
    label1.text = "N/A"
End Try

我从 json 中获取数字，但我想为大约 1200 种不同的价格和标签执行此操作。有没有办法大规模做到这一点？

问题是我重复了 200 个 url 的代码，当我测试我的程序时，它只是加载了标签！我卡住了！ （可能是在做过程）大约半小时什么也没做！我尝试使用背景工作，但后来我记得它不能更改标签文本！

我想要我将通过 url 获取这些 json 数据 url 并将它们保存到一个 xml 文件中，当一切都完成时，然后将它们全部加载到标签中！

Answer 1

除了可以放置所有不同的参数之外，没有其他方法可以执行此操作，例如AK47 黑色层压板 全新成桌状

AK-47%20%7C%20Black%20Laminate%20%28Factory%20New%29

然后做一个查询

Select * FROM MarketItems 

像这样循环遍历它们

Foreach mUrl in marketUrl
    request = DirectCast(WebRequest.Create("http://steamcommunity.com/market/priceoverview/?appid=730&currency=3&market_hash_name=" + mUrl), HtmlWebRequest)

您能否详细解释一下您遇到了什么错误？

还有很多关于这个主题的主题：

Get the price of an item on Steam Community Market with PHP and Regex

Curl command to html or vb.net

从他们的角度来看，没有简单的方法可以做到这一点