¿Alguien experto? Cómo abrir aplicaciones de Office des un menu de Foxpro 6,

Alexander
21 de Enero del 2004
He tenido problemas al intentar abrir aplicaciones como Word, Excel, Power Point, Access, antivirus, Etec, desde un menú de foxpro 6; Tengo el sistema operativo de Windows XP profesional en mi máquina.
Con el Windows 98, no hay problemas al utilizar los comandos Run ó !start, estos comandos no funcionan en xp.
Les pido por favor si puden responder a mi inquietud...


David
21 de Enero del 2004
Efectivamente, a mí también me pasaba. En mi caso era al enlazar con el Word.
Al parecer el problema en XP viene con el nombre de archivo. Si se le da sin la ruta completa ("C:loquesea"), tiene problemas para localizarlo y devuelve un error de OLE. Poniendo toda la ruta, lo abre perfectamente, igual que lo hacía con Win98.
Espero resulte útil...

Mag
21 de Enero del 2004
no es tan complicado
solo crea un un procedimiento dentro de una las opciones de tu menu con los siguientes datos

word= createobject('word.application','')
word.show

espero y te sirva

CHRISTIAN
21 de Enero del 2004
Espero que te pueda servir de algo este código

LOCAL cErrores, lExcel

* BUSCO UNA SESION DE EXCEL YA ACTIVA:
cErrores = ON("ERROR")
ON ERROR lExcel = .F.
oExcel = GetObject(,"excel.application")
ON ERROR &cErrores

IF TYPE("oExcel") # 'O'
* NO ESTABA ACTIVA. PREPARO UNA NUEVA SESION DE EXCEL:
oExcel = CREATEOBJECT("Excel.Application")
ENDIF
oExcel.VISIBLE = .T. && VISUALIZO EXCEL
oExcel.Workbooks.ADD && PREPARO UN NUEVO TRABAJO DE EXCEL

****Las demás aplicaciones de OFFICE son muy parecidas, lo importante es que no importa la ruta en que se encuentren los programas************

BYE, ESTOY A TUS ORDENES