Visual Basic para Aplicaciones - com genero El Bakup y Hacer Restore en VB

Quiero saber como genero mi Backup y Restore de mis Bases de Datos de un Sistema en Visual Basic, estoy Utiliando el Pkzip y el Pkunzip pero es para DOS yo quiero que genere un archivo enpaquetado para poderlo copiar en Diskketes u Otros medios magneticos.

Eo es facil, solo tienes que crear un programa automorpho, en un archivo de texto dejar guardados los archivos a empaquetar, despues mediante un metodo de compresion como el de duplicidad o el de rebundancia o combinados, hacer que el programa automorpho los agregue (ya encriptados) a su codigo, y cuando corras el programa que los descomprima por los mismos metodos ya mencionados.

existe un control OCX que se llama actiziper. lo copias en el win32
y los buscas en el adicionar nuevos controles ahi te mado un pedazo de codigo para que lo veas,

si tienes un formulario principal, insertas un control common dialog y el actiziper luego los llamas

con este codigo hago la copia
Private Sub btncopia_Click()
frmprincipal.CommonDialog.ShowSave
If frmprincipal.CommonDialog.FileName = "" Then Exit Sub
ActiveZipper1.SourceFile = App.Path & "\bdentucar.mdb"
Cadena = frmprincipal.CommonDialog.FileName & ".Zip"
ActiveZipper1.OutPutFile = Cadena
ActiveZipper1.Compress
End Sub

con este codigo restauro la copia
Private Sub btnrestaurar_Click()
frmprincipal.CommonDialog.ShowOpen
If frmprincipal.CommonDialog.FileName = "" Then Exit Sub
ActiveZipper1.SourceFile = frmprincipal.CommonDialog.FileName
ActiveZipper1.OutPutFile = App.Path & "\bdentucar.mdb"
ActiveZipper1.Decompress
End Sub

si recibistes esto escribeme, te lo agradezco