Ошибка загрузки 2-legged oAuth в Google Документы - PullRequest
Новая
       35

Ошибка загрузки 2-legged oAuth в Google Документы

2 голосов
/ 09 марта 2011

Я - пользователь Служб Google, пытающийся написать функцию в VB.NET для загрузки файлов в учетные записи Google Docs определенного пользователя (конечно, все в моем домене Служб Google). Я пытался сделать это с помощью Google GData API для ASP.NET, но, к сожалению, согласно Googler, эта библиотека не добавляет xoauth_requestor_id в URL ...

Я не знаю, как это добавить, и не знаю, как создать запрос HTTP POST вручную, особенно в отношении того, как отправлять полезную нагрузку XML, которую Google упоминает на своем сайте, показанном ниже ...

Ниже приведена моя попытка создать HTTP POST для Документов Google вручную, используя код, найденный по адресу: Страница API Google GData

Этот код возвращает 401-Несанкционированную ошибку: 

Protected Sub UploadToGDocs2() 
        Dim str As String = "" 
        'The commented-out code below is the HTTP POST code mentioned on 
        'http://code.google.com/apis/accounts/docs/OAuth.html#tokensGADomains 
        ' 
        'POST /feeds/documents/private/full?xoauth_requestor_id=j.doe%40example.com HTTP1.1 
        'Host:   docs.google.com() 
        'Content-Type: application/atom+xml 
        'Authorization: OAuth() 
        'oauth_version="1.0", 
        'oauth_nonce="1c4fbbe4387a685829d5938a3d97988c", 
        'oauth_timestamp="1227303732", 
        'oauth_consumer_key="example.com", 
        'oauth_signature_method="HMAC-SHA1", 
        '        oauth_signature = "lqz%2F%2BfwtusOas8szdYd0lAxC8%3D" 
        '<atom:entry xmlns:atom="http://www.w3.org/2005/Atom"> 
        '  <atom:category scheme="http://schemas.google.com/g/2005#kind" 
        '                 term="http://schemas.google.com/docs/2007#document" /> 
        '  <atom:title>Company Perks</atom:title> 
        '</atom:entry 

       'Here's my attempt to build the HTTP POST command in .NET 
        Dim web As New System.Net.WebClient() 
        web.Headers.Add("Host", "docs.google.com") 
        web.Headers.Add("Content-Type", "application/atom+xml") 
        web.Headers.Add("Authorization", "OAuth") 
        Dim keyval As New StringBuilder 
        keyval.Append("oauth_version=1.0") 
        keyval.Append("&oauth_nonce=1c4fbbe4387a685829d5938a3d97988c") 
        keyval.Append("&oauth_timestamp=1227303732") 
        keyval.Append("&oauth_consumer_key=myDomain.com") 
        keyval.Append("&oauth_signature_method=HMAC-SHA1") 
        keyval.Append("&oauth_signature=mySecretKey") 



       'I have no idea what to do with the XML code below. Where does it go? 

        keyval.Append("&<atom:entry xmlns:atom='http://www.w3.org/2005/ 
Atom'>") 
        keyval.Append("<atom:category scheme='http:// 
schemas.google.com/g/2005#kind'") 
        keyval.Append("term='http://schemas.google.com/docs/ 
2007#document'") 
        keyval.Append("<atom:title>Company Perks</atom:title>") 
        keyval.Append("</atom:entry") 
        Dim d As Byte() = 
System.Text.Encoding.ASCII.GetBytes(keyval.ToString) 
        Dim myUrl As String = "https://docs.google.com/feeds/someone 
%40myDomain.com/private/full?xoauth_requestor_id=someone 
%40myDomain.com" 
        Dim res As Byte() = web.UploadData(myUrl.ToString, "POST", d) 
        Response.Write(System.Text.Encoding.ASCII.GetString(res)) 
    End Sub
...