Ver Mensaje Individual
  #4 (permalink)  
Antiguo 22/05/2008, 00:42
skullsp
 
Fecha de Ingreso: marzo-2005
Mensajes: 4
Antigüedad: 19 años, 2 meses
Puntos: 0
Respuesta: Crear Directorio, Copiar Archivos y Renombrar Archivos con VB 6.0

Cita:
Iniciado por juanes222 Ver Mensaje
Saludos, quisiera saber como podria realizar las siguientes operaciones en VB 6.0:
  1. Crear un directorio
  2. Copiar determinados archvos
  3. Renonmbrar determinados archivos

Se agradece cualquer colaboracion

mkdir "Ruta de la carpeta"

ej: mkdir "C:\hola"

para copiar, podes hacerlo con api

Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

ej: CopyFile "C:\hola\archivo.txt", "C:\archivo.txt", 0

y para renombrar un archivo... es asi:


Pimero copias con la funcion de arriba el mismo archivo pero le cambias el nombre, de esta manera:

ej: CopyFile "C:\hola\archivo.txt", "C:\hola\NuevoNombre.txt", 0

y despues agregas esta otra api y eliminas el archivo anterior, asi:

Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long

ej: DeleteFile "C:\hola\archivo.exe"


y listo...


espero que te halla servido