Ver Mensaje Individual
  #3 (permalink)  
Antiguo 06/06/2002, 09:47
Digital8
 
Fecha de Ingreso: abril-2002
Mensajes: 11
Antigüedad: 22 años
Puntos: 0
Re: generar documento word

Tienes que incluir en tu proyecto en Referencias la de Microsoft Word Object Library.
Dim W as Word.Application
Set W = New Word.Application
W.Documents.Add
' para grabar texto.
W.Selection.Text = "primera linea" & VbCrLf & "segunda linea" & VbCrLf & "tercera linea"
'para insertar documento de texto o Word.
W.Selection.InsertFile "C:\Fichero.txt"
'para insertar mapa bits (tiene que estar en un picture).
Clipboard.Clear
Clipboard.SetData Picture1.Picture, vbCFBitmap
W.Selection.PasteSpecial (Clipboard.GetData)
'para guardar el documento.
W.ActiveDocuments.SaveAs "C:\Fichero.Doc"
W.ActiveDocument.Close
W.Quit
Set W = Nothing

En cuanto a crear un documento Pdf te puedo enviar una función de Vb que genera, a partir de un fichero de texto un archivo PDF (Sólo admite texto plano sin gráficos ni imágenes).

De todas formas hay un programa que genera archivos en PDF gratis y lo puedes encontrar en http//over.to/freepdf ó en www.ghostgum.com.au.
Esto es bastante complicado y además está todo en inglés y funciona creando una impresora virtual laser.
Saludos,