System.Xml.Linq 命名空间

发布于 2024-11-28 23:05:47 字数 655 浏览 0 评论 0原文

我的任务是调用一个 Web 服务，该服务返回一个 xml 数据源，我正在这样做；

For Each r As DataRow in SomeDataTable
    Dim msFeed As String = string.format("http://some-feed.com?param={0}", r!SOME_VAL)
    Dim x As XDocument = XDocument.Load(msFeed)
Next

这一切都很好，但是正如您所看到的，x 每次迭代都会被覆盖。我需要的是创建一个 xDocument 并添加循环中的每个提要，但我不确定如何继续。

谢谢

解决方案

Dim xAllFeeds As XElement = New XElement("Feeds")

For Each r As DataRow in SomeDataTable
    Dim msFeed As String = string.format("http://some-feed.com?param={0}", r!SOME_VAL)
    Dim x As XDocument = XDocument.Load(msFeed)
    xAllFeeds.Add(x.Root)
Next

原文

I have been given the task of calling a web service which returns an xml data feed which I am doing like so;

For Each r As DataRow in SomeDataTable
    Dim msFeed As String = string.format("http://some-feed.com?param={0}", r!SOME_VAL)
    Dim x As XDocument = XDocument.Load(msFeed)
Next

This is all fine but as you can see x just gets overwritten with every iteration. What I need is create an xDocument and add each feed from my loop but I am unsure how to proceed.

Thanks

Solution

Dim xAllFeeds As XElement = New XElement("Feeds")

For Each r As DataRow in SomeDataTable
    Dim msFeed As String = string.format("http://some-feed.com?param={0}", r!SOME_VAL)
    Dim x As XDocument = XDocument.Load(msFeed)
    xAllFeeds.Add(x.Root)
Next

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

甜心 2024-12-05 23:05:47

不是 100% 确定 VB 语法（C# 是我选择的语言），但这应该是您所追求的要点。

Dim xAllFeeds As XElement = New XElement("Feeds")
For Each r As DataRow in SomeDataTable
    Dim msFeed As String = string.format("http://some-feed.com?param={0}", r!SOME_VAL)
    Dim xDoc As XDocument = XDocument.Load(msFeed)
    xAllFeeds.Add(xDoc.Root)
Next

Not 100% sure of the VB syntax (C# is my language of choice), but this should be the gist of what you're after.

Dim xAllFeeds As XElement = New XElement("Feeds")
For Each r As DataRow in SomeDataTable
    Dim msFeed As String = string.format("http://some-feed.com?param={0}", r!SOME_VAL)
    Dim xDoc As XDocument = XDocument.Load(msFeed)
    xAllFeeds.Add(xDoc.Root)
Next

回复收藏 0 原文

~没有更多了~