Pilar
22 de Octubre del 2003

Hola¡
Quiero guardar un formulario y no se como hacerlo.Lo que he hecho ha sido esto:
Private Sub mnuguardar_Click()
cd.Filter = "Formularios (*.frm)|*.frm|"
cd.ShowSave
End Sub

pero claro solo me aparece la ventana para guardar lo que quiero pero no me lo guarda.¿Que me faltaria?
Y para abrir otro form me pasa lo mismo:

Private Sub mnuabrir_Click()
' Establece los filtros.
cd.Filter = "Formularios (*.frm)|*.frm|"
cd.ShowOpen
End Sub

Gracias

Juan
22 de Octubre del 2003

Lo que sucede es que el commondialog no sirve para
guardar, abrir, ... Lo único que hacen esos dialogos
es preguntar.

De manera que cuando el usuario cierra el dialogo
tu programa tiene acceso a la respuesta que dio. Por
ejemplo, en el caso de ShowSave y ShowOpen, el
CommonDialog guarda la ruta y nombre del archivo
en su propiedad FileName.

Si quieres que tu programa guarde o abra ese archivo
tendrás que escribir el código que lo hace, teniendo
en cuenta el nombre de archivo devuelto por el CommonDialog