7

それぞれに ID が関連付けられているツイート (クラス: SimpleTweet) のリストを並べ替えようとしています (x は SimpleTweet クラスのオブジェクトである x.ID)。「OrderByDescending」を使用して linq を使用してこれを並べ替えていますが、並べ替えられたリストと等しいタイプ List(Of SimpleTweet) の新しいオブジェクトを設定した行でエラーが発生しています。私が得ているエラーは、「System.InvalidCastException: タイプ 'System.Linq.OrderedEnumerable 2[SimpleTweet,System.Int64]' to type 'System.Collections.Generic.List1[SimpleTweet]' のオブジェクトをキャストできません」です。

コード：

 <WebMethod()> _
    Public Function GetTweetsByUserID(ByVal userID As Integer) As List(Of SimpleTweet)
        Dim result As New List(Of SimpleTweet)
        Dim urlTwitter As String = "https://api.twitter.com/1/statuses/user_timeline.xml?include_entities=true&include_rts=true&screen_name={0}&count=3"
        'Dim twitterfeed As String = utils.GetUserTwitterFeeds(userID, "docphin")
        Dim lq As New lqDFDataContext
        Dim var = lq.web_GetTweetsByUserID(userID).ToList()
        Dim sortedresult As New List(Of SimpleTweet)
        If Not var Is Nothing Then
            For Each twitterfeed In var

                Dim listURL As String = String.Format(urlTwitter, twitterFeed.TweeterFeed)

                Dim tweetXML As XmlDocument = utils.GetXMLForURL(listURL)

                Dim tweetnodelist As XmlNodeList = tweetXML.ChildNodes(1).ChildNodes

                For Each node As XmlNode In tweetnodelist
                    Dim tweet As New SimpleTweet
                    tweet.CreatedAt = node.SelectSingleNode("created_at").InnerText
                    tweet.HTMLText = utils.ReturnTextWithHRefLink(node.SelectSingleNode("text").InnerText)
                    tweet.ID = node.SelectSingleNode("id").InnerText
                    tweet.Name = node.SelectSingleNode("user/name").InnerText
                    tweet.ScreenName = node.SelectSingleNode("user/screen_name").InnerText
                    tweet.Text = node.SelectSingleNode("text").InnerText
                    tweet.UserID = node.SelectSingleNode("user/id").InnerText
                    tweet.ProfileImageURL = node.SelectSingleNode("user/profile_image_url_https").InnerText
                    result.Add(tweet)
                Next
            Next

        sortedresult = result.OrderByDescending(Function(tweet) tweet.ID)  
        End If
        Return sortedresult
    End Function
4

2 に答える 2

10

resultへの呼び出しでを具体化する必要があります.ToList()。この行の末尾に追加します。

sortedresult = result.OrderByDescending(Function(tweet) tweet.ID)

sortedResult型であり、予期される型に自動的にキャストできないList(Of SimpleTweet)をOrderByDescending返します。IOrderedEnumerable(Of SimpleTweet)

于 2012-08-15T14:58:38.917 に答える
3

を返したいので、から新しいリストを作成するためList(Of SimpleTweet)に呼び出す必要があります:ToListIEnumerable(Of SimpleTweet)

Return sortedresult.ToList()

ToList 即時のクエリ評価を強制します。

于 2012-08-15T14:58:50.747 に答える