Título: Copiar Ficheros en net Publicado por: David Vans en 18 Abril 2007, 22:57 pm Hola a todos estoy usando vb.net queria algo para copiar archivos en uso ya que no me deja copiar ficheros en uso proque pone asceso denegado
Estoy creandome un progrma que haga copias de seguridad Un salud Título: Re: Copiar Ficheros en net Publicado por: MaLkAvIaN_NeT en 24 Abril 2007, 22:37 pm hay programas que no se pueden copiar y si según la política del programa o el sistema operativo, y esto es mas por seguridad, no por otra cosa, ni desde el mismo windows puedes copiar archivos en uso como un *.mdf entre otros.
antes hay que terminar con unos procesos, luego hacer la copia, pero apagar procesos en caliente tambien es riesgoso. Título: Re: Copiar Ficheros en net Publicado por: d(-_-)b en 8 Mayo 2007, 12:06 pm Copiar archivos y carpetas a otro directorio Código: '/// <summary> '/// Permite copiar archivos y carpetas '/// </summary> '/// <param name="diSource">Directorio origen</param> '/// <param name="diDestination">Directorio Destino</param> '/// <param name="overwrite">Sobreescribir archivos</param> '/// <remarks>Creado por Eduardo S. Almazán (RootK - www.forosdelweb.com)</remarks> Private Sub CopyFiles(ByVal diSource As DirectoryInfo, ByVal diDestination As DirectoryInfo, _ ByVal blOverwrite As Boolean) Dim diSourceSubDirectories() As DirectoryInfo Dim fiSourceFiles() As FileInfo 'obtengo todos los archivos del directorio origen fiSourceFiles = diSource.GetFiles() 'obtengo los subdirectorios (si existen) diSourceSubDirectories = diSource.GetDirectories() 'si no existe el directorio destino crearlo If Not diDestination.Exists Then diDestination.Create() 'Usar la recursividad para navegar por los subdirectorios 'e ir obteniendo los archivos hasta llegar al final For Each diSourceSubDirectory As DirectoryInfo In diSourceSubDirectories CopyFiles(diSourceSubDirectory, New DirectoryInfo(diDestination.FullName & "\" & _ diSourceSubDirectory.Name), blOverwrite) Next For Each fiSourceFile As FileInfo In fiSourceFiles fiSourceFile.CopyTo(diDestination.FullName + "\" + fiSourceFile.Name, blOverwrite) Next End Sub Para llamarlo: 'ruta del directorio origen Dim diSource As New DirectoryInfo("C:\folderOrigen") 'ruta del directorio destino Dim diDestiny As New DirectoryInfo("C:\folderDestino") CopyFiles(diSource, diDestiny, True) esta es la web de donde lo copie espero que te sirve de algo http://www.cssboulevar.com.ar/net/codigos/?id=12 Título: Re: Copiar Ficheros en net Publicado por: dvreggionx en 17 Abril 2008, 00:16 am http://multingles.net/docs/shadowcopy.htm
lo único que encontré es esto.... pero no lo pude hacer andar..... "No se encuentra C:\vshadow\GeneratedVarsTempScript.cmd" Título: Re: Copiar Ficheros en net Publicado por: MANULOMM en 29 Abril 2008, 06:01 am te recomiendo que mires ciertas caracteristicas del windows como el microsoft software copy provider, hay muchos servicios que optimizan estas tareas...
Atentamente, Juan Manuel Lombana Medellìn - Colombia |