Visual Basic - INTRODUCIR CONTENIDO TEXTBOX EN RUTA DE ARCHIVO

Life is soft - evento anual de software empresarial
   
Vista:

INTRODUCIR CONTENIDO TEXTBOX EN RUTA DE ARCHIVO

Publicado por Roger (5 intervenciones) el 25/03/2015 09:50:29
Hola,
Estoy haciendo un pequeño programa y quiero que me copie unos archivos de una carpeta a otra.
Este programa lo tienen que usar varios usuarios, así que el programa pide el nombre de usuario para saber donde buscar.
Ejemplo:

Mi nombre de usuario es: PEPITO (escrito en un textbox)
Ahora quiero que al pulsar el boton de copiar me copie el contenido de la carpeta:
C:\Documents and Setting\ PEPITO\documentos\*.txt

Si introduzco otro nombre de usuario, quiero que me modifique la ruta por el nombre de usuario nuevo.

Es decir, que quiero que esta ruta (C:\Documents and Settings\NOMBREUSUARIO\documentos\*.txt), vaia a copiar según el nombre de usuario introducido anteriormente.

Y quiero que copie el contenido de la carpeta en otra ruta, pero del mismo usuario.

No se si me he explicado bien.

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Megamind

INTRODUCIR CONTENIDO TEXTBOX EN RUTA DE ARCHIVO

Publicado por Megamind (121 intervenciones) el 25/03/2015 11:41:48
Hola
Una forma podría ser así

Dim Usuario As String
Dim Origen As String
Dim Destino As String

Usuario = "Juanito"

Origen = "C:\CarpetaOrigen\Archivo.txt"
Destino = "C:\" & Usuario & "\" & "Archivo.txt"

If Dir(Destino, vbDirectory) = "" Then
'La carpeta no existe
MkDir "C:\" & Usuario
FileCopy Origen, Destino
Else
'La carpeta ya existe
FileCopy Origen, Destino
End If

Mirate esto
http://www.recursosvisualbasic.com.ar/htm/tutoriales/fso.htm
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

INTRODUCIR CONTENIDO TEXTBOX EN RUTA DE ARCHIVO

Publicado por Roger (5 intervenciones) el 26/03/2015 11:04:49
Muchas gracias MEGAMIND!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de LUIS FRANCO

INTRODUCIR CONTENIDO TEXTBOX EN RUTA DE ARCHIVO

Publicado por LUIS FRANCO FRANCO_LUIS776@YAHOO.ES (72 intervenciones) el 25/03/2015 23:34:34
MEGAMIND TE DIO LA RESPUESTA AMIGO. SALUDOS
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar