Saber archivos zip utilizando Visual Basic.NET (VB.NET puede ahorrar tiempo si usted necesita para comprimir una gran cantidad de archivos. Zip es un formato de archivo utilizado para la compresión de archivos. Los archivos son a menudo con cremallera si van a ser enviados a través de correo electrónico para una transferencia más rápida. También son comprimidos para ahorrar espacio en el disco duro. VB.NET es orientado a objetos lenguaje de programacion desarrollado por Microsoft. VB.NET es valorado por su flexibilidad y facilidad de uso.


Saber archivos zip utilizando Visual Basic.NET (VB.NET puede ahorrar tiempo si usted necesita para comprimir una gran cantidad de archivos. Zip es un formato de archivo utilizado para la compresión de archivos. Los archivos son a menudo con cremallera si van a ser enviados a través de correo electrónico para una transferencia más rápida. También son comprimidos para ahorrar espacio en el disco duro. VB.NET es orientado a objetos lenguaje de programacion desarrollado por Microsoft. VB.NET es valorado por su flexibilidad y facilidad de uso.
  • Inicie Microsoft Visual Basic Express y haga clic en 'Nuevo Proyecto...' en el panel izquierdo de su pantalla. Haga doble clic en 'Aplicación de Consola.'
  • Presione 'Ctrl' y, a continuación, pulse 'Borrar' para quitar el código existente.
  • Copia y pega el siguiente código en su 'Module1.vb' módulo.
    las Importaciones del Sistema.IO
    las Importaciones del Sistema.IO.La compresión
    Módulo Module1
    Sub Main()
    Dim zipDirPath as String = 'C:/filesToZip'
    Dim DirInfo Como DirectoryInfo = New DirectoryInfo(zipDirPath)
    Para Cada currentFileInfo Como FileInfo En DirInfo.GetFiles()
    Comprimir(currentFileInfo)
    Siguiente
    End Sub
    Private Sub Comprimir(ByVal currentFileInfo Como FileInfo)
    el Uso de este argumento Como FileStream = currentFileInfo.OpenRead()
    If (Archivo.GetAttributes(currentFileInfo.FullName) Y FileAttributes.Oculto) _
    <> FileAttributes.Oculto Y currentFileInfo.Extensión <> '.gz', a Continuación,
    el Uso de outFile Como FileStream = Archivo.Crear(currentFileInfo.FullName '.gz')
    el Uso de Comprimir Como GZipStream = _
    Nueva GZipStream(outFile, CompressionMode.Comprimir)
    inFile.CopyTo(Comprimir)
    Console.WriteLine('Comprimido {0} {1} a {2} bytes.', _
    currentFileInfo.Nombre, currentFileInfo.Longitud.ToString(), _
    outFile.Longitud.ToString())
    Con
    Con
    Si
    Con
    End Sub
    Final del Módulo
  • Editar la siguiente línea de código y escriba su propia ruta de acceso del archivo.
    Dim zipDirPath as String = 'C:/filesToZip'
    Presione 'F5' para ejecutar el programa.








Como comprimir Archivos Usando VB Net


Saber archivos zip utilizando Visual Basic.NET (VB.NET puede ahorrar tiempo si usted necesita para comprimir una gran cantidad de archivos. Zip es un formato de archivo utilizado para la compresion de archivos. Los archivos son a menudo con cremallera si van a ser enviados a traves de correo electronico para una transferencia mas rapida. Tambien son comprimidos para ahorrar espacio en el disco duro. VB.NET es orientado a objetos lenguaje de programacion desarrollado por Microsoft. VB.NET es valorado por su flexibilidad y facilidad de uso.


Saber archivos zip utilizando Visual Basic.NET (VB.NET puede ahorrar tiempo si usted necesita para comprimir una gran cantidad de archivos. Zip es un formato de archivo utilizado para la compresion de archivos. Los archivos son a menudo con cremallera si van a ser enviados a traves de correo electronico para una transferencia mas rapida. Tambien son comprimidos para ahorrar espacio en el disco duro. VB.NET es orientado a objetos lenguaje de programacion desarrollado por Microsoft. VB.NET es valorado por su flexibilidad y facilidad de uso.
  • Inicie Microsoft Visual Basic Express y haga clic en 'Nuevo Proyecto...' en el panel izquierdo de su pantalla. Haga doble clic en 'Aplicacion de Consola.'
  • Presione 'Ctrl' y, a continuacion, pulse 'Borrar' para quitar el codigo existente.
  • Copia y pega el siguiente codigo en su 'Module1.vb' modulo.
    las Importaciones del Sistema.IO
    las Importaciones del Sistema.IO.La compresion
    Modulo Module1
    Sub Main()
    Dim zipDirPath as String = 'C:/filesToZip'
    Dim DirInfo Como DirectoryInfo = New DirectoryInfo(zipDirPath)
    Para Cada currentFileInfo Como FileInfo En DirInfo.GetFiles()
    Comprimir(currentFileInfo)
    Siguiente
    End Sub
    Private Sub Comprimir(ByVal currentFileInfo Como FileInfo)
    el Uso de este argumento Como FileStream = currentFileInfo.OpenRead()
    If (Archivo.GetAttributes(currentFileInfo.FullName) Y FileAttributes.Oculto) _
    <> FileAttributes.Oculto Y currentFileInfo.Extension <> '.gz', a Continuacion,
    el Uso de outFile Como FileStream = Archivo.Crear(currentFileInfo.FullName '.gz')
    el Uso de Comprimir Como GZipStream = _
    Nueva GZipStream(outFile, CompressionMode.Comprimir)
    inFile.CopyTo(Comprimir)
    Console.WriteLine('Comprimido {0} {1} a {2} bytes.', _
    currentFileInfo.Nombre, currentFileInfo.Longitud.ToString(), _
    outFile.Longitud.ToString())
    Con
    Con
    Si
    Con
    End Sub
    Final del Modulo
  • Editar la siguiente linea de codigo y escriba su propia ruta de acceso del archivo.
    Dim zipDirPath as String = 'C:/filesToZip'
    Presione 'F5' para ejecutar el programa.

Cómo comprimir Archivos Usando VB Net

Saber archivos zip utilizando Visual Basic.NET (VB.NET puede ahorrar tiempo si usted necesita para comprimir una gran cantidad de archivos. Zip es un formato de archivo utilizado para la compresión de archivos. Los archivos son a menudo con cremallera si van a ser enviados a través de correo electrónico para una transferencia más rápida. También son comprimidos para ahorrar espacio en el disco duro. VB.NET es orientado a objetos lenguaje de programacion desarrollado por Microsoft. VB.NET es valorado por su flexibilidad y facilidad de uso.
Recommander aux amis
  • gplus
  • pinterest

Comentario

Dejar un comentario

Clasificación