Visual Basic - Como Concatenar 2 archivos .doc en vb6

Life is soft - evento anual de software empresarial
 
Vista:

Como Concatenar 2 archivos .doc en vb6

Publicado por Christian (3 intervenciones) el 20/08/2005 00:55:54
Tengo que concatenar 2 archivos .doc y dejarlo en un tercero con vb6 si alguien save como hacerlo se lo agradeceria.
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:Como Concatenar 2 archivos .doc en vb6

Publicado por [email protected] (463 intervenciones) el 20/08/2005 01:32:37
Como ahorita estoy casi casi de ocioso, lo voy a hacer para ayudarte... ahí te va...+

Set Of_Word = Nothing
Set Of_Word = New Word.Application

Of_Word.Application.Visible = False 'si acaso no quieres que se vea la pantalla de Word

Of_Word.Documents.Open FileName:="""C:\doc1.doc""", ConfirmConversions:=False, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto, XMLTransform:=""

Of_Word.Selection.EndKey Unit:=wdStory
Of_Word.Selection.InsertBreak Type:=wdPageBreak
Of_Word.Selection.InsertFile FileName:="C:\doc2.doc", Range:="", ConfirmConversions _
:=False, Link:=False, Attachment:=False
Of_Word.ActiveDocument.SaveAs FileName:="C:\doc3.doc", FileFormat:= _
wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _
True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _
False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False
Of_Word.Application.Visible = True ' para que pongas la aplicación visible, en caso de que quieras que se vez

Este código abre un archivo llamado doc1.doc, le inserta el archivo doc2.doc, luego graba el archivo como doc3.doc.

OJO: Los archivos doc1.doc y doc2.doc DEBEN DE EXISTIR, además el archivo doc3.doc NO DEBE DE EXISTIR, ya si quieres controlar esto... búscale como preguntar en VBasic si algún archivo existe o no...

Espero te sirva.

SALUDOS
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:Como Concatenar 2 archivos .doc en vb6

Publicado por Christian (3 intervenciones) el 22/08/2005 17:42:46
Muchas gracias por la ayuda, ya lo probe y funciono perfecto.

SALUDOS.
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