none
Ayuda con Webbrowser al cargar un pdf o una url RRS feed

  • Pregunta

  • Hola, necesito ayuda con un control webbrowser.

    Tengo un formulario en el que en un webbrowser muestro una URL o un fichero pdf. Lo hago de la siguiente manera:

    Private Sub CargarDatos()
            WebBrowser1.Navigate("about:blank") 'Limpiamos el webbrowser       
            Dim com As OleDbCommand = Nothing
            Dim dr As OleDbDataReader = Nothing
            con.Open()
            Try
                com = New OleDbCommand("SELECT * FROM  tblLegislacionEspecifica WHERE idLegislacion = " & ElementoSeleccionado & "", con)
                dr = com.ExecuteReader(CommandBehavior.CloseConnection)
                If dr.HasRows Then
                    dr.Read()                           
                    WebBrowser1.Navigate(dr.Item("RutaFicheroLegislacion"))                
                    TextBox1.Text = dr.Item("DescripcionLegislacion")
                    TextBox2.Text = dr.Item("DetallesLegislacion")
                    TextBox3.Text = dr.Item("Comentarios")
                    TextBox4.text = dr.Item("RutaFicheroLegislacion")
                    Label6.Text = dr.Item("FechaIngreso")         
                End If

    En el evento... webbrowser_DocumentCompleted tengo el siguiente codigo:

    If WebBrowser1.Document IsNot Nothing Then
               
               Dim HTML As String
                '----------The HTML CODE GOES FROM HERE AND DOWN----------
                HTML = "<html><head></head>" & _
                                    "<body><FONT COLOR = #E6E6E6><span style=""font-family:Arial;font-size: 11pt;""><P><H1><B><BR><BR><BR><BR><BR><BR><BR><CENTER>" & _
                                    "Aún no se ha cargado un fichero<BR>para este elemento.</B></H1></p></body></html>"
                '----------The HTML CODE GOES HERE AND ABOVE----------
                WebBrowser1.Document.Write(HTML)
            End If

    -o-o-o-o-o-o-

    El campo "RutaFicheroLegislacion" contiene según el caso el enlace a una carpeta en la que se encuentra el fichero pdf o la ruta de una dirección URL.

    Lo que pretendo es que si el campo RutaFicheroLegislacion está vacio me escrita el mensaje de que no hay un fichero o una ruta para mostrar. En caso contrario que me cargue el pdf o me muestre la url.

    Lo que me sucede es que si existe un fichero pdf, me lo carga en el Webbrowser. Si existe una URL me la muestra un instante y a continuación me salta el mensaje que he puesto en el evento webbrowser_DocumentCompleted.

    Gracias y saludos.

    • Cambiado Enrique M. Montejo miércoles, 15 de marzo de 2017 7:32 Pregunta relacionada con controles de Windows Forms.
    jueves, 9 de marzo de 2017 22:05