Sort:  
  • Trending
    • [-]
     8 years ago  

    Dim ArquivoParaSubir As New File()
    ArquivoParaSubir.Title = nome
    ArquivoParaSubir.Description = "Prueba"
    ArquivoParaSubir.MimeType =""
    theFile.Parents = new List(Of ParentReference)() From {New ParentReference() With {.Id = "Carpeta"}} '**** en esta parte tengo problemas para definir la carpeta.

    $0.00
      Reply
      [-]
       8 years ago (edited) 

      Eso lo implementé en las ultimas versiones. Mira el último post que escribí: https://steemit.com/spanish/@moisesmcardona/mi-herramienta-para-subir-archivos-a-google-drive-version-1-4

      Dim FileMetadata As New Data.File
      FileMetadata.Name = My.Computer.FileSystem.GetName(GetFile)
      Dim FileFolder As New List(Of String)
      If String.IsNullOrEmpty(TextBox2.Text) = False Then
      FileFolder.Add(TextBox2.Text)
      Else
      FileFolder.Add("root")
      End If
      FileMetadata.Parents = FileFolder

      $0.00
        Reply