Problemas con OpenFileDialog
Publicado por Carlos (15 intervenciones) el 17/03/2009 22:54:14
Hola:
Las siguientes sentencias abren un diálogo para elegir un documento Word que después de seleccionarlo cargamos en un RichTextBox.
Bueno, la cuestión es que esto funciona unas veces sí y otras no.
¿Alguien me puede aclarar esto?
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 sentencias abren un diálogo para elegir un documento Word que después de seleccionarlo cargamos en un RichTextBox.
Bueno, la cuestión es que esto funciona unas veces sí y otras no.
¿Alguien me puede aclarar esto?
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