Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub SurroundingSub()
- Dim fileMetadata = New File() With {
- .Name = "photo.jpg"
- }
- Dim request As FilesResource.CreateMediaUpload
- Using stream = New System.IO.FileStream("files/photo.jpg", System.IO.FileMode.Open)
- request = driveService.Files.Create(fileMetadata, stream, "image/jpeg")
- request.Fields = "id"
- request.Upload()
- End Using
- Dim file = request.ResponseBody
- Console.WriteLine("File ID: " & file.Id)
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement