Como programar en red con visual basic 6 - Saber nombre e ip de computadora

En esta entrada, veremos cómo programar nuestra primera aplicación con la cual nos adentraremos en el mundo de la programación en red con visual basic 6.

Primeramente, debemos buscar el control Microsoft winsock control en el menú “proyecto->componentes”, activar su casilla y pulsar el botón “Aceptar”.

El control tiene una apariencia como la siguiente figura:

Y al agregarlo aparecerá en la barra de controles.

Hecho esto procedemos a realizar nuestra primera aplicación.

Primera aplicación: saber ip y nombre de nuestra computadora (programa 01)

Para esto abrimos visual basic 6.0 y creamos lo siguiente

-          2 etiquetas  (label1 y label2), label1 en caption “Esta es mi ip”, label2 en caption “Nombre de mi computadora”

-          2 cuadros de texto (text1 y text2)

-          2 botones de comando (command1 y command2), command1 en caption “Cual es mi ip?”, command2 en caption “Cual es mi nombre”.

-          1 winsock (winsock1)

Se debe ver algo como esto:

Hecho esto programemos el command1 “Cual es mi ip?”

Private Sub Command1_Click()

  Text1.Text = Winsock1.LocalIP ‘Obtiene la ip de la computadora

End Sub

Y ahora programemos el command2 “Cual es mi nombre”

Private Sub Command2_Click()

  Text2.Text = Winsock1.LocalHostName ‘Obtiene el nombre de la computadora

End Sub

Y ahora a correr nuestra aplicación y pulsar en los dos botones, y la ejecución debe ser algo como esto:

Claro la ip que están viendo es la que tenía yo cuando ejecuté el programa, y el nombre que ven es el nombre de mi computadora, el código está muy chico y explicadas sus lineas.

El código fuente lo puedes encontrar en: http://www.como-programar.com/downloads/codigos-curso-para-programar-en-red-con-visual-basic-6.rar

Espero les sea de utilidad a quienes se inician en este mundo de la programación en red con visual basic 6.

Te invito a que nos compartas tus comentarios.