Google doc でドキュメントをダウンロードおよびアップロードできる VB.Net のアプリケーションがあります。しかし、Google doc は Google ドライブになりました。
このコードを使用して、アカウントに接続しました。
Public Class Form1
Dim DocServices As DocumentsService
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
logIn()
End Sub
Sub logIn()
DocServices = New DocumentsService("DocListUploader")
DocServices.setUserCredentials(txtUserName.Text, txtPassword.Text)
Dim docQuery As New DocumentsListQuery
docQuery.NumberToRetrieve = 1
DocServices.Query(docQuery)
getDocList()
End Sub
Sub getDocList()
Me.lbDocs.Items.Clear()
Dim resultFeed As DocumentsFeed = Me.theFeed()
Dim entry As New DocumentEntry
For Each entry In resultFeed.Entries
Me.lbDocs.Items.Add(entry.Title.Text)
Next
End Sub
Function theFeed() As DocumentsFeed
Dim query As New DocumentsListQuery()
Dim feed As DocumentsFeed = DocServices.Query(query)
Return feed
End Function
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim theFilename As String = OpenFileDialog1.FileName
Dim theEntry As DocumentEntry
theEntry = DocServices.UploadDocument(theFilename, Nothing)
End If
End Sub
End Class
同じことを考えたいのですが、Googleドライブを使用します。vb.net には、このような c# でのみコードが見つかりません。私を助けてください。