Navegador

Visual Basic.Net y C#

 

Fecha: 25/Jul/2005 (22-07-05)
Autor: Jose Maria Quintanilla Rivera Correo:josemaria@ugb.edu.sv

 


Creación de un Navegador

Hola amigos voy empezar explicándoles como diseñar un navegador en Visual Basic.Net y C #. No sin Antes Recordarte que requerimos que Evalúes este articulo, TU OPINIÓN CUENTA.

Lo primeros que debemos hacer en crear un proyecto nuevo de aplicación Windows Form, ya sea para Visual Basic .Net o C #, cuando ya nos aparezca el formulario, nos vamos a ir al cuadro de herramientas, y vamos a dar clic derecho y Agregar ficha con el nombre Navegador.

Posteriormente en esa ficha le damos clic derecho Personalizar Cuadro de Herramientas en este seleccionamos el componente COM  la opción Explorador del Web Microsoft

Ahora en la ficha de navegador te aparecerá el componente Explorer


Ahora lo que debes hacer el seleccionarlo y arrastrarlo hacia el formulario y colocarle en la propiedad name= navegador. Además de ese control agrega un TextBox en Blanco, una label con la propiedad text = Dirección; y tres botones de comando con la propiedad text= Atras;   text= Siguiente; text= Inicio; respectivamente, a modo que conserves la siguiente figura:

Hasta esta parte en ambos lenguajes es el mismo proceso, ahora vamos a efectuar la codificacion para cada lenguaje.

Visual Basic .net

Evento Load del Formulario

        dim entrada as object = 0

        dim cadena as string = ""

        dim compara as object = cadena

        Me.navegador.navigate ("www.google.com", entrada, compara, cadena, compara)

Evento Change de Textbox

        dim entrada as object = 0

        dim cadena as string = ""

        dim compara as object = cadena

Me.navegador.navigate (TextBox1.Text, entrada, compara, cadena,  compara)

Eventos Click

Boton Anterior:

try

Me.navegador.GoBack()

Catch err As Exception

  MessageBox.Show(err.Message, "Error en Navegacion")

end try

Boton Siguiente:

try

  me.navegador.goforward ()

Catch err As Exception

  MessageBox.Show(err.Message, "Error en Navegacion")

end try

Boton Inicio:

Try

   me.navegador.gohome ()

Catch err As Exception

   MessageBox.Show(err.Message, "Error en Navegacion")

End try

 

Visual C#

 

Evento Load del Formulario

object entrada = 0;

string cadena = "";

object compara = cadena;

this .navegador.Navigate("www.google.com.sv",ref entrada,

ref compara,ref cadena,ref compara);

Evento Change de Textbox

object entrada = 0;

string cadena = "";

object compara = cadena;

this .navegador.Navigate (TextBox1.Text,ref entrada,

ref compara,ref cadena,ref compara);

Eventos Click

Boton Anterior:

try

{

  this.navegador.goback (); 

}

catch (System.Exception err)

{

  MessageBox.Show(err.Message, "error");

}

Boton Siguiente:

try

{

this.navegador.goforward (); 

catch (System.Exception err)

{

  MessageBox.Show(err.Message, "error");

}

Boton Inicio:

try

{

this.navegador.gohome (); 

catch (System.Exception err)

{

  MessageBox.Show(err.Message, "error");

}


Fichero con el código de ejemplo: josemaria_navegador.zip - Tamaño 2 KB


ir al índice