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,
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


0