Does your code have any Google Account authorization code ?
Tom Wilson Freelance Google Base Developer and Consultant www.tomthedeveloper.com Google Base Tools - http://dev.tomthedeveloper.com/googlebase On Dec 29, 12:07 pm, homesourcefeed <[email protected]> wrote: > Hello, > > I am getting the below error when I execute code to post an real > estate property/item to google base: > > The remote server returned an error: (401) Unauthorized > [GDataRequestException: Execution of request > failed:http://www.google.com/base/feeds/items] > > Here is my code: > -------------------------------------------------------------------------- > Dim service As GBaseService > service = New GBaseService("Google-Tutorial-1.0", "developer key") > Dim entry As New GBaseEntry > entry.Title.Text = "Sample RE Property From Haresh" > entry.Content.Content = "This is a test real estate > property.<br><br>Sample RE Property From Haresh<br><br>Thanks! > <br>Haresh" > entry.GBaseAttributes.AddTextAttribute("description", "This is a test > real estate property.<br><br>Sample RE Property From > Haresh<br><br>Thanks!<br>Haresh") > entry.GBaseAttributes.AddTextAttribute("id", "1001") > entry.GBaseAttributes.AddTextAttribute("link", "http:// > homesource.ohubz.com/property.aspx?Id=803") > entry.GBaseAttributes.AddNumberAttribute("price", 1888000) > entry.GBaseAttributes.Location = "BELMAR, NJ - 07719" > entry.GBaseAttributes.AddTextAttribute("agent", "Haresh Vachhani") > entry.GBaseAttributes.AddNumberUnitAttribute("area", 50, "square ft.") > entry.GBaseAttributes.AddNumberAttribute("bathrooms", 2) > entry.GBaseAttributes.AddNumberAttribute("bedrooms", 2) > entry.GBaseAttributes.AddTextAttribute("feature", "Air conditioner, > garden etc...") > entry.GBaseAttributes.AddTextAttribute("listing_status", "active") > entry.GBaseAttributes.AddTextAttribute("listing_type", "for sale") > entry.GBaseAttributes.AddNumberUnitAttribute("lot_size", 55, "square > ft.") > entry.GBaseAttributes.AddTextAttribute("mls_listing_id", "20mlshv345") > entry.GBaseAttributes.AddTextAttribute("mls_name", "Haresh MLS") > entry.GBaseAttributes.AddNumberAttribute("property_taxes", 200) > entry.GBaseAttributes.AddTextAttribute("property_type", "apartment") > entry.GBaseAttributes.AddTextAttribute("provider_class", "broker") > entry.GBaseAttributes.AddTextAttribute("school", "union high school") > entry.GBaseAttributes.AddTextAttribute("school_district", "union > school district") > entry.GBaseAttributes.AddNumberAttribute("Year", 2000) > entry.GBaseAttributes.AddTextAttribute("zoning", "residential") > Dim myEntry As GBaseEntry > myEntry = service.Insert(GBaseUriFactory.Default.ItemsFeedUri, entry) > -------------------------------------------------------------------------- > > Can someone please guide/help me to resolve this issue? > > Thanks, > > Haresh --~--~---------~--~----~------------~-------~--~----~ You received this message because you are subscribed to the Google Groups "Google Base Data API" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/Google-Base-data-API?hl=en -~----------~----~----~----~------~----~------~--~---
