Mostrar barra de progreso al copiar un archivo.

Question

Hola, al intentar copiar un archivo y que me muestre la barra de progreso por defecto de windows me esta dando un error y ya no veo porque.

[code=vbnet]

        Dim srcFile1 As String
        Dim dstFile1 As String

        srcFile1 = "C:\Users\Alfredo\Desktop\iconos1"
        dstFile1 = "C:\Users\Alfredo\Desktop\iconos2"

        My.Computer.FileSystem.CopyFile(srcFile1, dstFile1, FileIO.UIOption.AllDialogs)[/code]

Este es el codigo y este el error que me da.

System.IO.FileNotFoundException: 'No se pudo encontrar el archivo 'C:\Users\Alfredo\Desktop\iconos1'.'

Sabeis que me falta?

gracias-

Answer 1

Hola Alfredo Biot,

La excepción FileNotFoundException indica que no encuentra el archivo en la ruta especificada, si te das cuenta en la ruta que estás escribiendo a tu archivo le falta la extensión, ya sea .png, .jpg, etc.

Además si quieres utilizar la ruta de tu escritorio puedes hacer uso de la clase Environment, por ejemplo :

Dim srcFile1 = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "iconos1.png")
Dim dstFile1 = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "iconos2.png")

My.Computer.FileSystem.CopyFile(srcFile1, dstFile1, FileIO.UIOption.AllDialogs)

Saludos.

---

JC NaupaCrispín
Lima - Perú

La magia no existe, la programación SI

Answer 2

Hola, perdona por haber tardado tanto en contestar, te agradezco mucho la ayuda.

Un saludo y pruebo lo que me escribes. gracias de nuevo.

---

Alfredo.