if no categories, then exitIf IsNothing(Response.CategoryArray) ThenTextBox1.Text = No categories returned for this site id. Exit SubEnd If display the categoriesFor Each items In Response.CategoryArrayTextBox1.Text = TextBox1.Text & vbCrLf & Category ID: & _ items.CategoryID & vbCrLfTextBox1.Text = TextBox1.Text & Category Name: & _ items.CategoryName & vbCrLfNextElse display any errors that occurredTextBox1.Text = For intCount = 0 To Response.Errors.Length – 1TextBox1.Text = TextBox1.Text & Error: & _ Response.Errors(intCount).ErrorCodeTextBox1.Text = TextBox1.Text & vbCrLf & Message: & _ Response.Errors(intCount).LongMessageNext intCountEnd IfExit Subhandleerror: MsgBox( An error occurred: & Err.Number & – & Err.Description) Exit SubEnd Sub2.Run the project and specify 2when prompted to run this example. XML ExampleThe following XMLcode retrieves categories for the specified site using the GetCategoriesmethod.Torun this example from the existing project, see the earlier instructions. Also, replace theCategorySiteIdvalue with the identifier corresponding to the eBay site you wish to use in yoursearch. < ?xml version= 1.0 encoding= utf-8 ?>
Note: If you are looking for good and high quality web space to host and run your application check Lunarwebhost Mac Web Hosting services