VFP6 y Excel

30/08/2003 - 19:26 por Carlos | Informe spam
Hola.
Tengo un problemita y nose como resolverlo
necesito abrir una hoja de texto en excel desde VFP y no consigo q me abra
el archivo, lei por ahi q debia grabar una macro haciendo paso a paso lo que
queria q fox hiciera y me dio resultado todo, pero lo que no trabaja es
precisamente eso abrir el archivo de texto en excel desde vfp
si alguno sabe como hacerlo y me puede dar un mano desde ya muchas gracias

oE=CREATEOBJECT("Excel.Application") && Crea el objeto
*****de aqui en adelante el error es: "ERROR DE SINTAXIS" *****
oE.Workbooks.OpenText FileName:="C:\Transfer\archivo.dat"
oE.Origin:=xlWindows, oE.StartRow:=1, oE.DataType:=xlFixedWidth,
oE.FieldInfo:=Array(Array(0, 2), Array(4, 2), Array(15, 2), Array(26, 2),
Array(29, 2), Array(33, 2), Array(44, 2), Array(52, 1), Array(132, 1),
Array(134, 1), Array(174, 2), Array(177, 2), Array(185, 9))
******
oE.visible=.T.

PD: Trabajo sobre Win98
 

Leer las respuestas

#1 Alfonso Morquecho
01/09/2003 - 23:10 | Informe spam
Hola:

Prueba esto:

oExcel=CreateObject("Excel.application")
oExcel.Workbooks.OpenText("C:\temp\prueba.txt")

Lo cheque con vfox 8 y si funciona, no creo que te
de problemas con el vfox 6

Saludos

Alfonso

Hola.
Tengo un problemita y nose como resolverlo
necesito abrir una hoja de texto en excel desde VFP y no


consigo q me abra
el archivo, lei por ahi q debia grabar una macro


haciendo paso a paso lo que
queria q fox hiciera y me dio resultado todo, pero lo


que no trabaja es
precisamente eso abrir el archivo de texto en excel


desde vfp
si alguno sabe como hacerlo y me puede dar un mano desde


ya muchas gracias

oE=CREATEOBJECT("Excel.Application") && Crea el objeto
*****de aqui en adelante el error es: "ERROR DE


SINTAXIS" *****
oE.Workbooks.OpenText FileName:="C:\Transfer\archivo.dat"
oE.Origin:=xlWindows, oE.StartRow:=1,


oE.DataType:=xlFixedWidth,
oE.FieldInfo:=Array(Array(0, 2), Array(4, 2), Array(15,


2), Array(26, 2),
Array(29, 2), Array(33, 2), Array(44, 2), Array(52, 1),


Array(132, 1),
Array(134, 1), Array(174, 2), Array(177, 2), Array(185,


9))
******
oE.visible=.T.

PD: Trabajo sobre Win98


.

Preguntas similares