API контактов Google: как использовать код авторизации?

Question

мне удалось получить контакты, когда я использую следующий код:

Dim parameters = New OAuth2Parameters() 
parameters.ClientId = "XXX.apps.googleusercontent.com" 
parameters.ClientSecret = "XXXX" 
parameters.RedirectUri = "urn:ietf:wg:oauth:2.0:oob" 
parameters.Scope = "https://www.google.com/m8/feeds" 

Dim authorizationUrl As String = OAuthUtil.CreateOAuth2AuthorizationUrl(parameters) 
Process.Start(authorizationUrl) 
Dim authCode As String = InputBox("Authorisation code", "Authorisation Code", "") 
parameters.AccessCode = authCode 

OAuthUtil.GetAccessToken(parameters) 
Dim accessToken = parameters.AccessToken 

Dim settings = New RequestSettings("my app name") 
Dim cr = New ContactsRequest(settings) 
Dim contcts = cr.GetContacts() 

Мой вопрос:

Как я могу каким-то образом сохранить авторизацию через сессий, так что не нужно спрашивать у пользователя каждые несколько часов, чтобы разрешить доступ к его списку контактов?

Answer 1

Мы можем использовать старый Access-Токен Обновлять-токен (которые получают в первый раз)

Dim parameters = New OAuth2Parameters() 
parameters.ClientId = "XXXXX.apps.googleusercontent.com" 
parameters.ClientSecret = "XXXXXX" 
parameters.RedirectUri = "urn:ietf:wg:oauth:2.0:oob" 
parameters.Scope = "https://www.google.com/m8/feeds" 
parameters.ResponseType = "code" 
parameters.AccessToken = "", /* use the value returned from the old call to GetAccessToken here */ 
parameters.RefreshToken = "", /* use the value returned from the old call to GetAccessToken here */ 

OAuthUtil.RefreshAccessToken(parameters)