2

頭が痛くなるまで、探して探して探しました！私がやろうとしているのは、ここから ATOM フィードを取得することです: National Weather Service Alertsからプログラムに組み込みますが、どこから始めればよいかわかりません :( 最終的にやりたいことは、Atom フィードをダウンロードして、スクロール ラベルに配置します. セクションなどを引き出して解析したくありません. 私の地域の NWS アラートを表示したいだけです. コードや何かを書き出すだけの人はいないと思います.中級の VB プログラマーにとって簡単かつ簡単にプログラミングするための正しい方向を教えていただければ幸いです。

4

1 に答える 1

1

これは、あなたのケースでうまくいくはずのコードサンプルです。既に Atom フィードをダウンロードしてディスクに保存していると仮定します。そうでない場合は、わずかな変更が必要になる場合があります。

Imports System.Xml
Imports System.ServiceModel.Syndication

Public Class Form1
  Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    Dim messageList As New Generic.List(Of String)
    Using feedReader = XmlReader.Create("X:\vi.php.webintents")
      Dim feedContent = SyndicationFeed.Load(feedReader)
      If feedContent Is Nothing Then Return
      For Each item As Object In feedContent.Items
        messageList.Add(Convert.ToString(item.Title.Text))
      Next
    End Using
    lbl_warnings.Text = String.Join(vbNewLine & vbNewLine, messageList)
  End Sub
End Class

"X:\vi.php.webintents"ファイルの場所に置き換えます。

を利用できるようにするには、参照System.ServiceModel.Syndicationに追加する必要がありSystem.ServiceModel.dllます (.NET 4.0)。.NET 3.5 の場合は、System.ServiceModel.Web.dll

この回答は、この例での使用のベースとしてSyndicationFeed使用しました。

于 2012-10-30T17:43:40.640 に答える