FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Cambiar nombre de documento Word sin guardarlo
Posts: 498
Joined: Thu May 10, 2007 08:30 PM
Cambiar nombre de documento Word sin guardarlo
Posted: Tue Nov 22, 2011 12:33 PM

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.

Peaaaaaso de foro...

FWH 2007 - xHarbour - BCC55
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: Cambiar nombre de documento Word sin guardarlo
Posted: Tue Nov 22, 2011 03:18 PM
antolin, intenta asi:
Code (fw): Select all Collapse
  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
Saludos,



Adhemar C.
Posts: 498
Joined: Thu May 10, 2007 08:30 PM
Re: Cambiar nombre de documento Word sin guardarlo
Posted: Wed Nov 23, 2011 07:11 AM

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

Peaaaaaso de foro...

FWH 2007 - xHarbour - BCC55
Posts: 1335
Joined: Fri Jun 13, 2008 11:04 AM
Re: Cambiar nombre de documento Word sin guardarlo
Posted: Thu Nov 24, 2011 04:29 AM
Did you try
Code (fw): Select all Collapse
oWordDoc:SaveAs (cWordFileName, 0)


Regards
Anser
Posts: 498
Joined: Thu May 10, 2007 08:30 PM
Re: Cambiar nombre de documento Word sin guardarlo
Posted: Mon Nov 28, 2011 07:38 AM

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.

Peaaaaaso de foro...

FWH 2007 - xHarbour - BCC55

Continue the discussion