Comprimir Varios Archivos En Visual Basic 2008

Ahora que tengo toda la juventud por delante me he propuesto aprender todo cuanto se me ocurra esto porque a como me dijo un compañero debemos de ser competitivos...

Bueno resulta que surgio la gran pregunta entre los compañeros de trabajo ¿Como Comprimo archivos en VB2008?, esto porque lo necesitábamos para la realización de un proyecto por lo que despues de Googlear un rato esto fue lo que me encontre....

Resulta que existe un dll muy interesante y sobre todo facil de utilizar (que es como nos gusta a todos) que nos ayuda a realizar este procedimiento esta dll la podes descargar en el siguiente vinculo:

http://www.codeplex.com/DotNetZip/Release/ProjectReleases.aspx?ReleaseId=8220

Esta dll es muy efectiva para la compresion de archivos en zip por lo que es muy importante aprender su uso....

Ok, una vez descargada la libreria procedemos a Realizar un nuevo proyecto:





Una vez hecho el proyecto diseñamos algo como lo siguiente... y agregamos la referencia de la dll...





Buscamos la dll (yo la tenia en el escritorio) y la agregamos.



Ahora viene lo interasante (lo que nos preocupa a todos) el codigo, una vez hecho todo lo anterior procedemos a importar la libreria a como muestra la siguiente imagen, ademas notemos que se concatena el TextDirzip con TextName mas .zip esto para darle la direccion de donde guardar nuestro zip asi como el nombre y la extencion.
Por otra parte en el metodo zip.addDirectory se le asigna la direccion de donde estan los archivos a comprimir y lo que hay entre comillas es para que comprima todo lo que tenga dicha carpeta...



Ejecutamos nuestro proyecto y asignamos los valores....




Precionamos el boton comprimir....... y se comprimen nuestros archivos, en este caso dentro de la carpeta "Archivos a Comprimir" yo tenia solo archivos txt.





Muy facil verdad¡¡¡ asi de facil esta dll nos ayuda a realizar este procedimiento.

Muchas Bendiciones, Hasta la Proxima :)