24/11/2004, 17:20
|
| | | Fecha de Ingreso: junio-2003 Ubicación: Asturias
Mensajes: 2.429
Antigüedad: 20 años, 11 meses Puntos: 7 | |
| CommonDialog Saber extensión antes de guardar o abrir
La cuestión es que cuando quiero guardar un fichero, tengo en el commondialog el filter establecido:
CDialogo.Filter = "Archivos RTF (*.rtf)|*.rtf|Archivos TXT (*.txt)|*.txt"
CDialogo.ShowSave
RTB.SaveFile CDialogo.FileName
Pero claro, no me lo guarda con la extenxion seleccionada.
Como podria hacer para que:
If CDialogo.FiltroSeleccionado = ".txt"
RTB.SaveFile CDialogo.FileName, vbCFText
else
RTB.SaveFile CDialogo.FileName, vbCFRFT
end if
En fin haber si pueden ayudarme. Y Gracias.
__________________
Charlie. |