Cambiar nombre de documento Word sin guardarlo

[antolin]

Hola a todos:

Tengo un pequeño problema que no sé resolver. A lo mejor es una tontería, pero he intentado de todo y llevo días navegando por internet pero no encuentro solución. A ver si alguien es capaz de ayudarme.

Resulta que créo un documento Word con oWord:Documents:Add(), com siempre, y Word, por defecto, lo llama "Documento1". Con SaveAs( ... ) se puede guardar con un nombre concreto. Pero lo que quiero es que el cliente decida si guardarlo o no, y si decide guardarlo que éste se guarde con un nombre concreto, no como "Documento1". Para ello tengo que cambiarle el nombre al documento desde código fuente siin tener que guardarlo antes, y eso es lo que no se como hacerlo.

A lo más que he llegado es a cambiarle el nombre en el pantalla con oActiveDoc:Window:Caption = "...", pero cuando le doy a guardar me sale el dialogo de guardarcomo donde me propone la palabra "FECHA" como nombre de fichero.

¿Alguna idea?

Muchas gracias de antmano.

[acuellar]

antolin, intenta asi:

Code: Select all  Expand view

  If( MsgNoYes( "Salvarlo como", "Por favor, Elija" ),GrabaComo(), )
....
Function GrabaComo()
    *Pedir el NOMBRE en xfile, yo se lo asignaré
    xFile:="NomDoc.Doc"
    oActiveDoc:SaveAs( xFile )
Return Nil
 

Saludos,

Adhemar

[antolin]

Gracias Acuellar, pero el problema es que el usuario tiene que revisar el informe e incluso cambair alguna cosa antes de guardarlo con un nombre concreto.

El SaveAs() no me sirve. Tengo que averiguar como le pone nombre el Office a sus ficheros para hacer lo mismo, pero no lo encuentro.

Saludos

[anserkk]

Did you try

Code: Select all  Expand view

oWordDoc:SaveAs (cWordFileName, 0)

Regards
Anser

[antolin]

Gracias anserkk. Funcionó perfectamente. ¿Qué tontería, no?

El caso es que en el MSDN no especidfica nada de eso y por ahí sólo encontré que el '0' corresponde a 'wdFormatDocument', pero nadie dice que con '0' el documento no se guarda. Esta claro que los informáticos vamos a tener que estudiar adivinación para meterse en Word.

Gracias de nuevo.

Saludos.