2012-05-22 5 views
0

다음 VBA 코드를 사용하여 Google API의 액세스 토큰에 대한 유효한 인증 토큰을 교환 할 때 "400 Bad Request"오류가 표시됩니다. 왜 누군가에게 빛을 비추어 줄 수 있습니까? 나는 1 주일 이상 이걸로 고투하고 있습니다.액세스 토큰을 교환 할 때 Google OAuth2 오류 400

Dim http As MSXML2.XMLHTTP 
Dim sUrl As String 
Dim sUrlHeader As String 
Dim svarbody As String 

Set http = New MSXML2.XMLHTTP 

sUrl = "https://accounts.google.com/o/oauth2/token? HTTP/1.1" 

http.Open "POST", sUrl 


http.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 

svarbody = "code=4%2FXAjmXiUlBXUAUGCnMvNKsxdyuJEJ.8kfzzrqo3wwTuJJVnL49Cc9gML_lbgI&" & _ 
"client_id=50487549202#-q27v28nvhmjhc0uobq35tjn09lhrh47r.apps.googleusercontent.com&" &   _ 
"redirect_uri=http%3A%2F%2Flocalhost&" & _ 
"scope=https%3A%2F%2Fwww.google.com%2Fcalendar%2Ffeeds&" & _ 
"client_secret=<secret delete for this post>&" & _ 
"grant_type=authorization_code" 

http.send svarbody 

Me.Text3 = http.status & vbCrLf & http.statusText & vbCrLf & http.responseText 
+0

응답 본문을 실제로 찾아보고 내용을 확인해야합니다. 이는 종종 400 오류의 원인을 알려줍니다. –

답변

0

이것은 매우 일반적인 문제입니다.

UPDATE 서버/컴퓨터 WINDOWS 시계, 사용 time.nist : 당신은 당신이 처음에 시도해야 진짜로 하나입니다

... 그것은 많은 접근법과 테스트를하고 해결하려고 ...하지만 수 .gov (또는 형제). (화면 하단에이 방법으로 인터넷 시간 변경) 윈도우 시간-날짜에 두 번 클릭

SntsDev 더 많은 코드를 사용할 때이 오류가 발생 VBA에서의 Oauth 2.0을 사용하여 내 경험에

0

Google 계정에 결제 정보를 설정해야 할 수 있습니다.

관련 문제