Manuel
Vi en uno de tus post
Estoy haciendo una aplicacion de cotizaciones a clientes
En esta aplicacion doy de alta una cotizacion pero en si la cotizacion se elabora en word dandole el nombre al archivo con el numero asignado desde la alta de cotizacion
Lo que yo quiero hacer desde mi aplicacion es abrir esa cotizacion en word e imprimila
Con esta porcion de codigo
logro imprimir directamente pero como dije anteriormente, que se abra en word e imprimirla
No se si me di a entender
De antemano muchas gracias
Saludos
Vi en uno de tus post
Asà es mo lo hago yo y no temgo problema alguno:
oWord := Tword():New()
oWord:OpenDoc(cRutaDoc)
//
oWord:Replace("[NOMBRE]",cNombre)
oWord:Replace("[DOMICILIO]",cDomicilio)
//
IF lPreWord
oWord:Visualizar()
ENDIF
//
oWord:PrintDoc()
oWord:End(.F.)
Un saludo,
Manuel
Estoy haciendo una aplicacion de cotizaciones a clientes
En esta aplicacion doy de alta una cotizacion pero en si la cotizacion se elabora en word dandole el nombre al archivo con el numero asignado desde la alta de cotizacion
Lo que yo quiero hacer desde mi aplicacion es abrir esa cotizacion en word e imprimila
Con esta porcion de codigo
STATIC FUNCTION Imprime Â
    oWord := Tword():New()
    oWord:OpenDoc("e:\descargas\pruebaword.doc")
    oWord:oWord:Set( "PrintPreview", .T.)
    oWord:oActiveDoc:Invoke(  "PrintPreview")
   oWord:Visualizar()
    lPreWord := .t.
  Â
   //
   //oWord:Replace("[NOMBRE]",cNombre)
   //oWord:Replace("[DOMICILIO]",cDomicilio)
   //
   //IF lPreWord
    // oWord:Visualizar()
   //ENDIF
   //
   //oWord:EditDoc()
   oWord:PrintDoc()
   oWord:End(.F.)
  Â
RETURN NILlogro imprimir directamente pero como dije anteriormente, que se abra en word e imprimirla
No se si me di a entender
De antemano muchas gracias
Saludos