FoxPro/Visual FoxPro - Exportar a Word

 
Vista:
sin imagen de perfil

Exportar a Word

Publicado por Carlos ACS (141 intervenciones) el 08/02/2007 18:21:30
hola a todos... saludos
Si alguien me puede ayudar para exportar el contenido de unos campos caracter al word, para imprimirlos como texto de word...

Muchas Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Exportar a Word

Publicado por sergio (737 intervenciones) el 08/02/2007 20:10:36
oWord=CreateObject("Word.Application")
WITH oWord
.Visible=.T. && para ver el documento enpantalla mietras se ejecuta

.Documents.Add && agrego una hoja
&& Seteos de Tipo de Hoja Carta

WITH oWord.ActiveDocument.PageSetup
*.LineNumbering.Active = 0
*.Orientation = 0
.TopMargin = 22
.BottomMargin = 22
.LeftMargin = 28
.RightMargin = 22
*.Gutter = 0
.HeaderDistance = 22
.FooterDistance = 22
.PageWidth = 612.1
.PageHeight = 792.1
*.FirstPageTray = 0
*.OtherPagesTray = 0
.SectionStart = 2
*.OddAndEvenPagesHeaderFooter = 0
*.DifferentFirstPageHeaderFooter = 0
*.VerticalAlignment = 0
*.SuppressEndnotes = 0
*.MirrorMargins = 0
*.TwoPagesOnOne = 0
*.GutterPos = 0
ENDWITH
oword.ActiveWindow.ActivePane.View.SeekView = 9

scan
.Selection.InsertAfter(aca va el campo de la tabla a imprimir en el word)
.Selection.Font.Name = "Courier New"
.Selection.Font.Size = 10
.Selection.Font.Underline = 0
.Selection.Font.Bold = 0
.Selection.Moveright
.Selection.TypeParagraph
endscan
endwith
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Exportar a Word

Publicado por Plinio (7841 intervenciones) el 09/02/2007 00:58:52
Si tienes un reporte en VFP puedes llevarlo a un documeto de word
http://www.universalthread.com/wconnect/wc.dll?2,2,9707
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar