Hello Marco, The best way to debug your issue is to compare the requests you send with what is sent by OAuth Playground: http://googlecodesamples.com/oauth_playground/
You can set your custom consumer key, signature etc... And compare the signature header with what your application sends. Best, Alain On Wed, Jan 11, 2012 at 7:57 AM, marco peschiera <[email protected]>wrote: > Hi everyone, > > I'm trying to make an application that get the address contacts from > google with Oauth. > > I arrive ( with many difficulty ) to get a valid access token. > > So i implement correct: > 1) https://www.google.com/accounts/OAuthGetRequestToken .... with > signature HMAC-SHA1 > 2) https://www.google.com/accounts/OAuthAuthorizeToken .... > 3) the redirect to prompt user > 4) https://www.google.com/accounts/OAuthGetAccessToken.. with signature > HMAC-SHA1 > > but i get blockd in the last step when i real ask to the API: > https://www.google.com/m8/feeds/contacts/me/full > > Google say that i sould send the authentication by header, but there isnt' > any example in internet to do that with classic asp. > > > I always get -> Error 401 - There was an error in your request. That's > all we know. With NO DETAIL ON THE ERROR !!!! > > > Please Help, > > Here my last part of the code: > > > Function RequestURL(strURL) > > Dim objHTTP > Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP.6.0") > objHTTP.Open "GET", strURL, False > '??????? HEADER ??? WHAT's THAT ??? > objHTTP.Send > > RequestURL = objHTTP.ResponseText > Set objHTTP = Nothing > > > End Function > > > > > > 'dim Parte(3) > parte(1) = "GET" > parte(2) = "https://www.google.com/m8/feeds/contacts/me/full" > parte(3) = "" & _ > "oauth_consumer_key=" & oauth_client_id & _ > "&oauth_nonce=" & "asda90812" & _ > "&oauth_signature_method=HMAC-SHA1" & _ > "&oauth_timestamp=" & oauth_timestamp & _ > "&oauth_token=" & oauth_token2 > 'here i add the signature with my function....The signature is correct as > it function for the previous request and Google give me an access token. > UrldaRichiedere = calcolaUrldaRichiedereConFirma(parte,Token_secret,true) > > htmlRisposta = RequestURL (UrldaRichiedere) > > > I may pay somebody that solve my problem. > > -- > You received this message because you are subscribed to the Google > Groups "Google Contacts, Shared Contacts and User Profiles APIs" 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://code.google.com/apis/contacts/community/forum.html > -- Alain Vongsouvanh | Developer Programs Engineer -- You received this message because you are subscribed to the Google Groups "Google Contacts, Shared Contacts and User Profiles APIs" 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://code.google.com/apis/contacts/community/forum.html
