最近我开始研究在应用程序里使用Google GData API,来连接Google Server,从上面获得联系人信息等信息,但是做了很多试验都没有成功,以下是我的代码:
Private Sub btnClient_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClient.Click
Try
Dim authFactory As GAuthSubRequestFactory = New GAuthSubRequestFactory("cp", Application.CompanyName & "-" & Application.ProductName & "-1.01")
authFactory.AccountType = "HOSTED_OR_GOOGLE"
authFactory.KeepAlive = True
Dim strServerName As String = authFactory.Service
Dim strApplicationName As String = authFactory.ApplicationName
Dim service As New ContactsService(authFactory.ApplicationName)
service.setUserCredentials("test@gmail.com", "test")
Dim query As New ContactsQuery(ContactsQuery.CreateContactsUri("default"))
Dim feed As ContactsFeed
feed = service.Query(query)
For Each entry As ContactEntry In feed.Entries
Console.WriteLine(entry.Title.Text)
For Each email As EMail In entry.Emails
Console.WriteLine(" " + email.Address)
Next
Next
Catch ex As Exception
MessageBox.Show(ex.Message.ToString())
End Try
End Sub
当程序按步调试运行的时候,走到"feed = service.Query(query)"就直接异常了,异常信息:“Excution of request failed:
http://www.google.com/m8/feeds/contacts/default/full”
在这里希望高手能够指点一下,到底在vb.net的应用程序中如何使用Google API连接服务器,获得该用户相应的一些信息呢。谢谢大家啦。