bajar a c:

Hay otro control, es de MS-DOS llamado PKZIP
buscalo y sirve al igual que le ZIP, y se puede manipular
como tu quieras ya sea en a: o en c: como a ti te
interesa espero te ayude, si me puedes mandar tu form 1
con tu control para que te diga que puedes agregar.

espero te sirva.

Tengo en un form 1 control OLE, con un archivo .zip

Desearía guardar este archivo en el c:\, cómo es posible?

qué otro control existe como contenedor?

muchas gracias


.

Hola José Luis,

Te anexo algo que conseguí en el MSDN, espero que te sirva de algo...
Saludos...=P

***************************************************
Guardar y recuperar datos incrustados

Los datos asociados a un objeto incrustado no son persistentes, es decir,
cuando se cierra un formulario que contiene un control contenedor OLE, se
pierde cualquier cambio efectuado en los datos asociados a ese control. Para
guardar en un archivo los datos actualizados desde un objeto, se utiliza el
método SaveToFile del control contenedor OLE. Una vez guardados los datos en
un archivo, puede abrir el archivo y restaurar el objeto.
Si el objeto está vinculado (OLEType = 0-Linked), sólo se guarda en el
archivo especificado la información del vínculo y una imagen de los datos.
La aplicación que ha creado el objeto mantiene los datos del objeto. Si un
usuario desea guardar los cambios efectuados en un archivo vinculado, debe
elegir el comando Guardar del menú Archivo del componente ActiveX porque el
método SaveToFile sólo se aplica a los objetos incrustados.
Si el objeto está incrustado (OLEType = 1-Embedded), el control contenedor
OLE mantiene los datos del objeto y la aplicación de Visual Basic los puede
guardar.
Los objetos del control contenedor OLE sólo se pueden guardar en archivos
binarios abiertos.
Para guardar los datos desde un objeto a un archivo
Abra un archivo en modo binario.


Utilice el método SaveToFile.
El procedimiento de evento cmdSaveObject_Click ilustra estos pasos:
Private Sub cmdSaveObject_Click ()
Dim FileNum As Integer
' Obtiene el número de archivo.
FileNum = FreeFile
' Abre el archivo que se va a guardar.
Open "PRUEBA.OLE" For Binary As #FileNum
' Guarda el archivo.
oleObj1.SaveToFile FileNum
' Cierra el archivo.
Close #FileNum
End Sub

Cuando se ha guardado un objeto en un archivo, se puede abrir y mostrar en
un control contenedor OLE.
Nota Cuando utiliza los métodos SaveToFile o ReadFromFile, la posición del
archivo se ubica inmediatamente detrás del objeto. Por tanto, si guarda
múltiples objetos en un archivo, debe leerlos en el mismo orden en que los
ha escrito.
Para leer datos de un archivo en un control contenedor OLE
Abra el archivo en modo binario.


Utilice el método ReadFromFile en el objeto.
El procedimiento de evento cmdOpenObject_Click ilustra estos pasos:
Private Sub cmdOpenObject_Click ()
Dim FileNum As Integer
' Obtiene el número de archivo.
FileNum = FreeFile
' Abre el archivo.
Open "PRUEBA.OLE" For Binary As #FileNum
' Lee el archivo.
oleObj1.ReadFromFile FileNum
' Cierra el archivo binario.
Close #FileNum
End Sub

El evento Updated se invoca cada vez que cambia el contenido de un objeto.
Este evento es útil para determinar si han cambiado los datos de un objeto
porque es lo último que se ha guardarlo. Para ello, establezca una variable
global en el evento Updated que indique que es necesario guardar el objeto.
Cuando guarde el objeto, restablezca la variable.

Laura N. Rojas C.
Informática
Caracas - Venezuela