Visual Basic.NET - Problemas con OpenFileDialog

 
Vista:

Problemas con OpenFileDialog

Publicado por Carlos (15 intervenciones) el 18/04/2009 10:56:44
Hola:

Las siguientes líneas de código abren un documento Word y lo cargan en un RichTextBox.
El problema es que practicamente la mayoria de las veces el Msgbox lanza el mensaje “El formato de archivo no es válido “.
No entiendo por que no funciona con todos los documentos word.
¿Falta alguna línea de código?

Dim oFD As New OpenFileDialog
oFD.Title = "Selecccionar el documento"
oFD.Filter = "formato 1|*.doc|formato 2|*.rtf"
If oFD.ShowDialog = Windows.Forms.DialogResult.OK Then
Try
Dim rutaDocumento As String = System.IO.Path.GetFullPath(oFD.FileName)
RichTextBox1.LoadFile(rutaDocumento)
Catch Exp As Exception
MsgBox(Exp.Message, MsgBoxStyle.Critical, "Error")
End Try
End If
Un saludo,
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
sin imagen de perfil

RE:Problemas con OpenFileDialog

Publicado por Joan F (129 intervenciones) el 18/04/2009 22:25:41
Hola,

Un RichTextBox puede abrir documentos de texto o Rich Text Format pero no puede abrir un documento de Word.

Con esto me refiero al contenido del archivo pero no a la extensión (o sea, puede tener un archivo con extensión .doc pero que realmente el contenido sea RTF)

Para abrir un documento de Word, el código sería (nota: se ha de añadir la referencia a Microsoft Word Object Library):

Dim AplicacionWord As Microsoft.Office.Interop.Word.Application
Dim DocumentoWord As Microsoft.Office.Interop.Word.Document

AplicacionWord = New Microsoft.Office.Interop.Word.Application()
DocumentoWord = AplicacionWord.Documents.Open("ruta del documento.doc")
RichTextBox1.Text = DocumentoWord.Content.Text

DocumentoWord.Close()
AplicacionWord.Quit()

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:Problemas con OpenFileDialog

Publicado por Carlos (15 intervenciones) el 19/04/2009 14:53:19
Hola:

Gracias por la explicación, funciona todo tal como dijiste.

Un saludo
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