Imprimir Página - problema con Commondialog

estoy intentando hacer un editor de texto
el problema surge cuando quiero guardar el text como un archivo
ya que si no especifico la extensión cuando ingreso el nombre no me lo guarda

el codigo q tiene es este

Código:

On Local Error Resume Nex
    CommonDialog1.CancelError = True
    CommonDialog1.DefaultExt = "*.txt"
    CommonDialog1.Filter = "Documentos de texto (*.txt)"
    CommonDialog1.ShowSave
    Open CommonDialog1.FileName For Output As #1
    Print #1, Text1
    Close

saben por que no me crea el archivo ????

ya encontre el problema

en vez de ser

Código:

    CommonDialog1.DefaultExt = "*.txt"

era

Código:

CommonDialog1.DefaultExt = ".txt"

disculpen

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: CH4ØZ en 13 Septiembre 2009, 01:11 am