VB Error [Help]

AAW Dec 6, 2013

  1. AAW

    AAW Developer XPG Developer Lifetime Gold
    0/47

    Joined:
    Aug 6, 2012
    Messages:
    648
    Likes Received:
    689
    Trophy Points:
    85
    Gender:
    Male
    Location:
    Inside XPG
    Console:
    Xbox
    Because im creating save editors and i need game title id's i decided to make a handy too that would help me, but i get the Game Name, but the TitleID shows as "D=Search"

    Error?
    [​IMG]

    ButtonX1 Code

    Code:
    If TextBoxX1.Text = Nothing Then
                MessageBoxEx.EnableGlass = False
                MessageBoxEx.show("Enter a Game", "Error")
            Else
                ListView1.Items.Clear()
                Try
                    Dim web As New HtmlWeb()
                    Dim doc As HtmlAgilityPack.HtmlDocument = web.Load("http://marketplace.xbox.com/en-US/Search?pagesize=90&query=" + TextBoxX1.Text + "&DownloadType=Game")
                    Dim listItems As HtmlNodeCollection = doc.DocumentNode.SelectNodes("//div[@class='grid-4']")
                    For Each node As HtmlNode In listItems
                        Title = node.SelectSingleNode("a").Attributes(2).Value
                        Dim href As String = node.SelectSingleNode("a").Attributes(1).Value
                        TID = href.Substring(href.Length - 8, 8)
                        Dim xitem As New ListViewItem(Title)
                        xitem.SubItems.Add(TID.ToUpper)
                        ListView1.Items.Add(xitem)
                    Next
                Catch ex As Exception
                    MsgBox(ex.Message)
                End Try
                Dim results As String = ListView1.Items.Count.ToString()
                If results = 0 Then
                    MessageBoxEx.EnableGlass = False
                    MessageBoxEx.Show("No Game(s) Found!", "InFormation")
                End If
            End If
     
  2. KillerVidz

    KillerVidz Rocky BANNED
    0/47

    Joined:
    Feb 20, 2012
    Messages:
    3,312
    Likes Received:
    1,279
    Trophy Points:
    0
    Gender:
    Male
    Location:
    XPG-UK
    Console:
    Xbox One
    It doesn't work since the Site update.
     

Share This Page

Close