Sort:  

gracias, habrá que darles un vistazo.

¡Hola! Espero que te guste el programa. En mi página web se encuentran los detalles de las versiones más recientes https://moisescardona.me

visitando tu web, este mi blog por si gustan visitarlo http://marjuanm.blogspot.com

Muy buen trabajo. Enhorabuena

Muchas gracias ^_^ Tal vez mañana libere el código en GitHub. Todavia sigo haciendole algunas cositas cheveres.

Hola, Una consulta: Como haces para definir una carpeta en google drive ?
Donde se subira los arquichos

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.

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