[VB.NET] Sendspace Uploader by fudmario

en: Julio 14, 2017, 11:05:51 pm

Aquí les dejo esta implementación que hice en vb.net de la API de Sendspace, para su uso deben registrarse en sendspace.com y generar su ApiKey en https://www.sendspace.com/dev_apikeys.html

Ejemplo de uso:

Código: (vbnet) [Seleccionar]

 Dim filePath As String = "C:\Compress\MoveControl.zip"
 Dim sendspaceclient As New Sendspace.SendspaceClient("YourApiKey")
 Dim ssService As New Sendspace.SendspaceService(sendspaceclient)
 ' De manera Sincronica
 'Dim result As Sendspace.SendspaceResponse = ssService.UploadFile(filePath)
 ' De manera Asincronica
 Dim result As Sendspace.SendspaceResponse = Await ssService.UploadFileAsync(filePath)
  MessageBox.Show(result.ToString())

Retorna:

Código: [Seleccionar]

Status.......: ok
File ID......: u9km31
File Name....: MoveControl.zip
Download Url.: https://www.sendspace.com/file/u9km31
Delete Url...: https://www.sendspace.com/delete/u9km31/5bb0402796182faa626e3aa7593137c7

El código fuente lo pueden descargar desde: https://github.com/fudmario/Sendspace
La libreria Compilada la pueden descargar Aquí: https://www.sendspace.com/file/iby9q7