topic-24189

Posts: 115

Joined: Sat Mar 07, 2009 09:36 PM

WORD--PARTE
Posted: Thu May 31, 2012 03:12 PM

Estimado anserkk desde ya muchas gracias por la ayuda.

Estoy en un dilema

la instrucción que me envio para grabar y leer funciona pero cuando leo un documento
ejemplo

 Nota01.doc   el word lo hace pero solo lectura.

 yo tengo una plantilla de la cual hago una copia cada vez que solicitan una nueva nota

el usuario debe escribis la nota y luego grabarla sin que word le pida donde guardarla.


No encuentro algun ejemplo en samples de fivewin y entre en la wiki y tampoco vi nada....


Si usted tiene algun ejemplo desde ya muchas gracias nuevamente.

anserkk

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

Re: WORD--PARTE
Posted: Fri Jun 01, 2012 04:06 AM

I do not know, whether I understood your requirement properly. I use Google translator to read, but sometimes the translator fails to convert properly

Did you mean that you want to open a word document as read only

OR

You have a template file. For a transaction you need to open the template file and then fill some data via prg code to the word file and then save the word file as different document.

Please let me know.
Regards

Anser

juan carlos bellucci

Posts: 115

Joined: Sat Mar 07, 2009 09:36 PM

Re: WORD--PARTE
Posted: Fri Jun 01, 2012 09:01 AM

Hola Buenos dias.

1.- tengo una plantilla pre definida como modelo de notas.

2.- debo cada crear una nota y asignarle un numero desde un software que aun no consigo terminar.

3.- para realizarlo lo que hago es copio la nota ejemplo.doc en nota01.doc , nota02.doc asi sucesivamente.

4.- cuando quiero abrir la nota02 se abre en modo solo lectura y no me permite realizar correcciones.

si tienes aulgun ejemplo de como abrir, leer, escribirla y ademas asignarle un numero en el final de la nota

seria una gran ayuda....

desde argentina nuevamente muchas gracias.

anserkk

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

Re: WORD--PARTE
Posted: Fri Jun 01, 2012 12:45 PM

Code (fw): Select all Collapse

#Include "FiveWin.ch"
//---------------------------//
Function Main()

    Local oWord , cTemplate:="\YourFolderName\YourTemplateFileName.Doc"
    Local cSaveAsFile := "D:\Nota Nro 1.doc"

    oWord := CreateObject( "Word.Application" )

    oWord:Documents:Open(cTemplate)

   // Make the Necessary changes in the word file and then save this file with a different name

    oWord:ActiveDocument:SaveAs(cSaveAsFile)
    oWord:ActiveDocument:Close()
    oWord:Quit()

Return nil

Regards
Anser

juan carlos bellucci

Posts: 115

Joined: Sat Mar 07, 2009 09:36 PM

Re: WORD--PARTE
Posted: Tue Jun 05, 2012 09:46 AM

Gracias Amigo.

Ya puedes contar con un amigo por buenos aires argentina.
ha sido de gran ayuda tus ejemplos.

eternamente agradecido. juanca252@yahoo.com.ar a tus ordenes para lo que gustes.

anserkk

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

Re: WORD--PARTE
Posted: Tue Jun 05, 2012 09:50 AM

juan carlos bellucci wrote:Gracias Amigo.

Ya puedes contar con un amigo por buenos aires argentina.
ha sido de gran ayuda tus ejemplos.

eternamente agradecido. juanca252@yahoo.com.ar a tus ordenes para lo que gustes.

Thank you. Your friend from India

Regards
Anser

FiveTech Support Forums

Continue the discussion