Copiar archivos de una carpeta (listbox1 y 2) cambiandoles el nombre desde un textbox

Question

Hola,necesito ayuda porque me he perdido.

Tengo dos listbox.

En el listbox1 ya tengo las rutas definidas y me salen los archivos que necesito.

dim directory= (ruta)

dim files () as Sistem.IO.fileinfo

La extensión también esta definida.

etc

Esta parte va bien, en el Listbox2 tambien tengo definida su ruta.

Ahora viene el problema 

Lo que quiero es seleccionar un archivo del listbox1, y que pase al listbox2 con otro nombre, ese nombre se lo daría desde el textbox (la extensión no cambiaría) Osea que tendria un textbox y un boton para decirle en que momento pasar.

Bueno espero que me hayais entendido y que me podais ayudar.

Muchas gracias.

Answer 1

Me explico fatal...

Lo que quiero es copiar un archivo a otra carpeta.

Utilizo los Listbox para listar los archivos.

Quiero seleccionar un archivo listado en 1 listbox, darle otro nombre desde el textbox y que se copie con el nuevo nombre al otro listbox cuando le de con un botón de copiar.

Muchas gracias!

Answer 2

En el Button he puesto

ListBox2.Items.Add (ListBox1.Items.Item (ListBox1.SelectedIndex)) 

Y si que pasa el Item, pero no el archivo que es lo que quiero.

He probado con.

My.Computer.FileSystem.MoveFile("C:\TestDir1\test.txt",

"C:\TestDir2\test2.txt")

Pero no funciona porque quiero ponerle el nombre desde un textbox, asi me moveria un archivo en concreto.... Sigo probando.

Answer 3

En el Button he puesto

ListBox2.Items.Add (ListBox1.Items.Item (ListBox1.SelectedIndex)) 

Y si que pasa el Item, pero no el archivo que es lo que quiero.

He probado con.

My.Computer.FileSystem.MoveFile("C:\TestDir1\test.txt",

"C:\TestDir2\test2.txt")

Pero no funciona porque quiero ponerle el nombre desde un textbox, asi me moveria un archivo en concreto.... Sigo probando.

Uff ya no se si es My.Computer.FileSystem.MoveFile o

My.Computer.FileSystem.copyFile

......

Answer 4

He encontrado esto, me imagino que es algo parecido...

' Copy the file to a new location without overwriting existing file. My.Computer.FileSystem.CopyFile( "C:\UserFiles\TestFiles\testFile.txt", "C:\UserFiles\TestFiles2\testFile.txt") ' Copy the file to a new folder, overwriting existing file. My.Computer.FileSystem.CopyFile( "C:\UserFiles\TestFiles\testFile.txt", "C:\UserFiles\TestFiles2\testFile.txt", Microsoft.VisualBasic.FileIO.UIOption.AllDialogs, Microsoft.VisualBasic.FileIO.UICancelOption.DoNothing) ' Copy the file to a new folder and rename it. My.Computer.FileSystem.CopyFile( "C:\UserFiles\TestFiles\testFile.txt", "C:\UserFiles\TestFiles2\NewFile.txt", Microsoft.VisualBasic.FileIO.UIOption.AllDialogs, Microsoft.VisualBasic.FileIO.UICancelOption.DoNothing)

Answer 5

Hola, alguien me puede guiar un poquillo?

Gracias